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Preface 


This manual describes how to use Assembler H Version 2, Release 1, Program 
Product 5668-962, hereafter referred to as the Assembler H program, or simply, 
assembler. 


Assembler H is an assembler language processor that performs high-speed 
assemblies on all IBM System/370, 303x, 308x, 3090, 9370 and 43xx processors, 
provided they are supported by any of the following operating systems: OS/VS2 
MVS 3.8, MVS/Extended Architecture (MVS/XA), MVS/System Product (MVS/SP) 
V1, OS/VS1 Release 7, VM/XA SP, VM/XA SF, or VM/SP. 


This manual is divided into three parts to distinguish between common use of 
assembler, use of assember on OS/VS systems, and use of assembler on CMS 
systems under VM. 


Who This Manual Is For 


This manual is for application programmers coding in the Assembler H lan- 
guage. It is intended to help you assemble, link-edit, and execute your 
program. It describes assembler options, how to invoke the assembler, assem- 
bler listing and output, assembler data sets, error diagnostic facilities, sample 
programs, programming techniques and considerations, messages, and storage 
estimates. 


How to Use This Manual 


To use this manual, you should be familiar with the basic concepts and facilities 
of your operating system as described in OS/VS17 Planning and Use Guide, 
GC24-5090; OS/VS2 MVS Overview, GC28-0984; MVS/Extended Architecture 
Overview, GC28-1146; or VM/SP Introduction, GC19-6200. You should also have 
a good understanding of the assembler language as described in Assembler H 
Version 2 Language Reference, GC26-4037, and, if running under MVS/XA, you 
should also understand the concepts described in MVS/Extended Architecture 
System Programming Library: 31-Bit Addressing, GC28-1158. 


And, because this is a reference manual, you should use the index or the table 
of contents to find the subject in which you are interested. 
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Organization of Manual 
Part 1. Common Information 


e “Chapter 1. Introduction” describes the organization of this manual, the 
purpose of the assembler, and system requirements. 


e “Chapter 2. Using the Assembler Listing” describes each field of the 
assembler listing. 


e “Chapter 3. Using the Assembler Diagnostic Facilities” describes the 
purpose and format of error messages, MNOTEs. and the MHELP macro 
trace facility. 


Part 2. OS/VS Information 


e “Chapter 4. Using the Assembler” reviews the concepts of job, job step, 
and job control language; describes assembler input and output; tells how 
the operating system handles your program; describes the assembler 
options, the data sets used by the assembler, the number of channel pro- 
grams, and return codes; and the job control language cataloged proce- 
dures supplied by IBM. The cataloged procedures can be used to 
assemble, link-edit or load, and execute an assembler program. 


e “Chapter 5. Programming Considerations” discusses various topics, such 
as Standard entry and exit procedures for problem programs and how to 
invoke the assembler dynamically. 


e “Chapter 6. Calculating Storage Requirements” describes the priorities and 
use of main storage by Assembler H during an assembly. 
Part 3. CMS Information 


e “Chapter 7. Assembler Language Programming under CMS” describes 
how to assemble and execute your program, how to choose and specify the 
options you need, and how to interpret the listing and diagnostic messages 
issued by the assembler. 


e “Chapter 8. Programming Considerations” discusses various topics, such 
as Standard entry and exit procedures for problem programs. 
Appendixes 


e “Appendix A, Sample Program” provides a sample program that demon- 
strates many of the assembler language features. 


e “Appendix B, MHELP Sample Macro Trace and Dump’ lists the operation, 
name, and operand entries related to macro calls. 


e “Appendix C, Object Deck Output” describes the object module output 
format. 


e Appendix D describes the Assembler H error diagnostic messages and 
abnormal termination messages. 


Lastly, a glossary is included to define the terms used in this manual. 
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Assembler H Version 2 Publications 


Assembler H Version 2 General Information contains a brief description of 
Assembler H and compares Version 2, Release 1, features with those of 
Version 1, Release 5. Comparisons are also made between Assembler H 
and VS Assembler. 


Assembler H Version 2 Installation, contains information necessary to install 
the assembler program. 


Assembler H Version 2 Programming Guide describes how to use Assem- 
bler H Version 2. 


Assembler H Version 2 Language Reference describes the basic assembler 
language functions and specifications that are available with Assembler H. 


Assembler H Version 2 Logic, describes the design logic and functional 
characteristics of Assembler H. 


Assembler Coding Form provides the means for programmers to structure 
their code in the proper columns. 


Related Publications 


Machine instruction information 


IBM System/370 Principles of Operation, GA22-7000 
IBM System/370 Extended Architecture Principles of Operation, SA22-7085 
IBM System/370 Vector Operations, SA22-7125 


IBM 4300 Processors Principles of Operation for ECPS: VSE Mode, 
GA22-7070 


IBM System/370 Reference Summary, GX20-1850 


OS/VS information 


OS/VS1 JCL Reference, GC24-5099 

OS/VS2 MVS JCL Reference, GC28-0692 

MVS/Extended Architecture JCL, GC28-1148 

OS/VS Linkage Editor and Loader, GC26-3813 

MVS/Extended Architecture Linkage Editor and Loader, GC26-4011 
OS/VS1 Supervisor Services and Macro Instructions, GC24-5103 
OS/VS2 MVS Supervisor Services and Macro Instructions, GC28-0683 


MVS/Extended Architecture System Programming Library: Supervisor Ser- 
vices and Macro Instructions, GC28-1154 


OS/VS1 Utilities, GC26-3901 

OS/VS2 MVS Utilities, GC26-3902 

MVS/Extended Architecture Utilities, GC26-4018 
MVS/Extended Architecture Conversion Notebook, GC28-1143 
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e MVS/Extended Architecture System Programming Library: 31-Bit Addressing, 
GC28-1158 





CMS information 
e VM/System Product System Messages and Codes, $C19-6204 
e VM/System Product CMS Command and Macro Reference, SC19-6209 
e VM/System Product CP Command Reference for General Users, SC19-6211 
e VM/System Product CMS User’s Guide, $C19-6210 


VS FORTRAN Version 2 communication information 


¢ VS FORTRAN Version 2 Language and Library Reference, SC26-4221 
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Summary of Changes 


Release 1 Update, December 1987 


Changes to the Product 
e Support has been added for the IBM DBCS-Host double-byte character set. 
Double-byte data can be used wherever single-byte data, enclosed by apos- 

trophes, is allowed. Refer to the Glossary for the definition of DBCS terms. 


e The MHELP facility has been extended. MHELP can now dump SETC 
symbols and parameters in hexadecimal as well as in EBCDIC format. 


e New machine instructions have been added for the IBM 3090 Vector Facility. 


e Extended and System/370 instruction sets are now contained in the Uni- 
versal instruction set. 


e The underscore character (_) is now allowed in variable symbols and inline 
macro names, as well as ordinary symbols. 


Changes to This Manual 
Documentation of the above product changes, as well as miscellaneous cor- 
rections to existing information, have been added. 


Summary of Changes Vil 
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Part 1. Common Information 


e “Chapter 1. Introduction” describes the organization of this manual, the 
purpose of the assembler, and system requirements. 


e “Chapter 2. Using the Assembler Listing” describes each field of the 
assembler listing. 


e “Chapter 3. Using the Assembler Diagnostic Facilities” describes the 
purpose and format of error messages, MNOTEs, and the MHELP macro 


trace facility. 
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Chapter 1. Introduction 


This chapter contains: 
e alist of system, machine, and storage requirements 


e a discussion of compatibility between Assembler H Version 2, and VS 
Assembler and OS Assembler H 


Requirements 


System Requirements 
Assembler H Version 2 requires one of the following operating systems: 


e MVS/XA—MVS/Extended Architecture 

e OS/VS2 MVS Release 3.8 

e OS/VS1 Release 7 

e MVS/SP Version 1—MVS System Product 

e VM/SP—VM/System Product 

e VM/XA SP—VM/Extended Architecture System Product 
e VM/XA SF—VM/Extended Architecture Systems Facility 


Note: Assembler H Version 2 cannot be used with the OS/MFT, OS/MVT, or 
OS/VS2 SVS operating systems. 


Assembler H supports the new operation codes available with the Extended 
Architecture mode processor, VM/XA, and bimodal addressing of MVS/XA. It is 
required for installation and service of MVS/SP — JES2 Version 2 and 
MVS/SP — JES3 Version 2, and for installation of Data Facility Product. 


Machine Requirements 
e For assembling Assembler H Version 2 programs: Programs written using 
Assembler H can be assembled, including use of the new Extended Archi- 
tecture mode processor machine instructions, on all IBM System/370, 303x, 
308x, 3090, 9370 and 43xx processors supported by the above operating 
systems. You may require the MVS/XA macro library to assemble pro- 
grams that will be executed on MVS/XA, depending on macro usage. 


e For executing Assembler H Version 2 programs: Execution of programs 
assembled with Version 2 containing Extended Architecture machine 
instructions can only be accomplished on processors operating in Extended 
Architecture mode under MVS/XA or an MVS/XA guest operating system 
under VM/XA Systems Facility. 


e One 2400 or 3400 series tape unit is required for installation. The 2400 
series tape unit is not, however, supported by MVS/XA. 


e Double-byte data can be displayed and/or entered in their national lan- 
guage representation on the following: 


IBM 3800-8 system printer 

IBM 3200 system printer 

IBM 3820 remote printer 

IBM PS/55 family as an IBM 3270 terminal 
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Storage Requirements 
e Virtual storage: Assembler H Version 2 requires a minimum of 200K bytes 
of main storage. 


e Auxiliary storage space: Auxiliary storage space is required for the fol- me 
lowing data sets: 


— System input. 

— Macro instruction library—either system or private or both. 

— An intermediate work file, which must be a direct-access device 
(3330/3333, 3340/3344, 3350, 3375, or 3380). Under VM/XA SF, the inter- 
mediate work file must be formatted as a CMS minidisk. Under VM/SP 
and VM/XA SP, the intermediate work file, which must be a direct- 
access device (3310, 3370, or one of the devices mentioned above), 
must also be formatted as a CMS minidisk. 

— Print output. 


e Library Space: In terms of the IBM 3350 Direct Access Storage require- 
ments, cataloged procedures for Assembler H require a maximum of one 
track on SYS1.PROCLIB, and the Assembler H load modules need approxi- 
mately 15 tracks on SYS1.LINKLIB or a private link library. 


e Installation: Please refer to Assembler H Version 2 Installation for installa- 
tion requirements. 


Compatibility 


The language supported by Assembler H Version 2 has functional extensions to 
the language supported by VS Assembler and OS Assembler H 5734-AS1 
Release 5. Programs written for VS Assembler and OS Assembler H Release 5 
that were successfully assembled with no warning or diagnostic messages can 
be assembled with Version 2, with the minor exceptions described in 

Appendix E, “Assembler H Version 2 Incompatibility with OS/VS Assembler.” 
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Chapter 2. Using the Assembler Listing 


This chapter tells you how to interpret the printed listing produced by the 
assembler. The listing is obtained only if the option LIST is in effect. Parts of 
the listing can be suppressed by using other options; for information on the 
listing options, refer to “Assembler H Options” on page 29 or “Assembler 
Options for CMS” on page 68. 


The Assembler H listing consists of up to five sections, ordered as follows: 


e External symbol dictionary (ESD) 

e Source and object program 

e Relocation dictionary (RLD) 

e Symbol and literal cross-reference 

e Diagnostic cross-reference and assembler summary 


Figure 10n page 6 shows each section of the listing. Each item marked with a 
number in the left-hand margin is explained in the following text. (See “Glos- 
sary’ for definitions of terms.) 
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PRIME EXTERNAL SYMBOL DICTIONARY PAGE 1 








(1) SYMBOL TYPE ID ADDR LENGTH LD ID FLAGS ASM H V 02 18.48 07/16/87 
PC 8601 080000 08001DC 80 
EXSYM ER 0002 
TOLOOP LD 800022 0001 
(2) PRIME SAMPLE LISTING DESCRIPTION PAGE 2 
(3) LOC OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT ASM H V 02 18.48 07/16/87 
000008 2 CSECT 00020000 
3 EXTRN EXSYM 00630000 
4 ENTRY IOLOOP 00040000 
00005 5 R5 EQU 5 00050000 
006000 9OEC DOOC Qe0eC 7 STM =:14, 12, 12(13) 00670000 
000004 05CA 8 BALR 12,80 80080000 
00006 9 USING *,12 00090000 
000006 50D0 CODE O000E4 18 ST 13, SAVE+4 00100000 
Q6600A 00080 0000 00000 11 LA 18, SAUE 00110002 
IEVO44 =*** ERROR *** UNDEFINED SYMBOL 
QOOG0E 5850 C1D2 001D8 12 L R5,=A(EXSYM) 00120000 
13 PRINT NOGEN 90130000 
14 OPEN (INDCB, ,OUTDCB, (OUTPUT) ) 00140000 
22 PRINT GEW 08150000 
24 TOLOOP GET ~~ INDCB, INBUF 00160000 
(4) 000022 4110 CO2A 00030 25+I0LO0P LA 1, INDCB LOAD PARAMETER REG 1 @2-IHBIN 
800026 4100 C182 60108 26+ LA 6, INBUF LOAD PARAMETER REG 8 Q2-IHBIN 
Q0002A 58FO 1036 00030 27+ L 15,48(0,1) LOAD GET ROUTINE ADDR 61-GET 
Q0002E O5EF 28+ BALR 14,15 LINK TO GET ROUTINE Q1-GET 
PRIME RELOCATION DICTIONARY PAGE 5 
(5) POS.ID REL.ID FLAGS ADDRESS ASM H V 02 18.48 07/16/87 
0001 0001 08 060019 
0001 0001 08 00001D 
6001 0001 08 000051 
0001 0001 08 000055 
8001 0001 QC 000068 
0001 8001 08 QO00AD 
0001 8001 OC 9000CO 
0001 0002 QC 0001D8 
PRIME CROSS REFERENCE PAGE 6 
(6) SYMBOL LEN VALUE DEFN REFERENCES ASM H V 02 18.48 07/16/87 
EOD 00001 GQDOOGEO 0132 0051 
ERR 00001 BOQ000EO 0133 9066 8118 
EXIT 00001 800QG0EO 0134 0053 8165 
EXSYM 08001 60000000 0003 4139 
INBUF 00001 000108 0136 0026 
IIDCB 00004 000030 0033 6018 8625 
IOLOOP 00004 900022 0025 96004 
OUTBUF 00001 000158 0137 
OUTDCB 00004 800088 0084 0020 
R5 00001 60000005 0005 0012 
SAUE ***X UNDEF INED**** 0011 
SAVE 00004 Q000E8 6135 06010 
=A(EXSYM) 
00004 800108 9139 8012 
PRIME DIAGNOSTIC CROSS REFERENCE AND ASSEMBLER SUMMARY PAGE 7 


ASM H V 02 18.48 07/16/87 
THE FOLLOWING STATEMENTS WERE FLAGGED 


(7) 000011 
1 STATEMENT FLAGGED IN THIS ASSEMBLY 8 WAS HIGHEST SEVERITY CODE 
(8) OVERRIDING PARAMETERS- SYSPARM(SAMPLE PROGRAM) ,NODECK,BATCH 


OPTIOWS FOR THIS ASSEMBLY 
NODECK, NOOBJECT, LIST, XREF(FULL), NORENT, tlOTEST, BATCH, ALIGN, ESD, RLD, NOTERM, NODBCS, 
LINECOUNT(55), FLAG({@), SYSPARM(SAMPLE PROGRAM) 


(9) HO OVERRIDING DD NAMES 
(10) 29 CARDS FROM SYSIN 2214 CARDS FROM SYSLIB 
161 LINES OUTPUT @ CARDS OUTPUT 


| Figure 1. Assembler H Listing 
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External Symbol Dictionary (ESD) 


This section of the listing contains the external symbol dictionary information 
passed to the linkage editor or loader in the object module. 


This section helps you find references between modules in a multimodule 
program. The ESD may be particularly helpful in debugging the execution of 
large programs constructed from several modules. 


The ESD entries describe the control sections, external references, and entry 
points in the assembled program. There are seven types of ESD entries (SD, 
LD, ER, PC, CM, XD, and WX). They are shown in Figure 2 with their associ- 
ated fields. For each of the different types of ESD entries, the Xs indicate which 
of the fields will have values. 


SYMBOL 


X 
X 
X 
X 
X 
X 


TYPE ID ADDR LENGTH LD ID FLAGS 
SD X X X - X 

LD - X - X - 

ER X - - - - 

PC X X X - X 

CM X X X - X 

XD X X X - - 

WX X - - - 


Figure 2. Types of ESD Entries 


(1) 


SYMBOL: The name of every external dummy section, control section, 
entry point, and external symbol. 


TYPE: The type designator for the entry, as shown in the table. The type 
designators are defined as: 


SD 


LD 


ER 


PC 


Control section definition. The symbol appeared in the name field of 
a CSECT or a START statement. 


Label definition. The symbol appeared as the operand of an ENTRY 
statement. 


External reference. The symbol appeared as the operand of an 
EXTRN statement, or was declared as a V-type address constant. 


Unnamed control section definition {private code). A CSECT or 
START statement that commences a control section does not have a 
symbol in the name field, or a control section is commenced {by any 
instruction which affects the location counter) before a CSECT or 
START is encountered. 


CM Common control section definition. The symbol appeared in the 


XD 


name field of a COM statement. 


External dummy section. The symbol appeared in the name field of 
a DXD statement or a Q-type address constant. (The external 
dummy section is also called a pseudo register in the appropriate 
Linkage Editor and Loader manual.) 
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WX Weak external reference. The symbol appeared as an operand in a 
WXTRN statement. 


ID: The external symbol dictionary identification number (ESDID). The 
number is a unique 4-digit hexadecimal number identifying the entry. It 
is used in combination with the LD entry of the ESD and in the relocation 
dictionary for referencing the ESD. 





ADDR: The address of the symbol (in hexadecimal notation) for SD- and 
LD-type entries, and blanks for ER- and WxX-type entries. For PC- and 
CM-type entries, it indicates the beginning address of the control section. 
For XD-type entries, it indicates the alignment by printing a number one 
less than the number of bytes in the unit of alignment. For example, 7 
indicates doubleword alignment. 


LENGTH: The assembled length, in bytes, of the control section (in 
hexadecimal notation). 


LD ID: For an LD-type entry, the ESDID of the control section in which 
the symbol was defined. 


FLAGS: For SD-, PC-, and CM-type entries, this field contains the fol- 


lowing flags: 
Bit 5: Q = RMODE is 24 
1 = RMODE is ANY 
Bits 6-7: 00 = AMODE is 24 
01 = AMODE is 24 
10 = AMODE is 31 
1] = AMODE is ANY 





Source and Object Program 


This section of the listing documents the source statements of the module and 
the resulting object code. 


This section is the most useful part of the listing, because it gives you a copy of 
all the statements in your source program (except listing control statements) 
exactly as they are entered into the machine. You can use it to find simple 
punching errors, and, together with the diagnostics and statistics, to locate and 
correct errors detected by the assembler. By using this section with the cross- 
reference section, you can check that your branches and data references are in 
order. The location counter values and the object code listed for each state- 
ment help you locate any errors in a storage dump. Finally, you can use this 
part of the listing to check that your macro instructions have been expanded 
properly. 


(2) “PRIME”: The 1- to 8-character deck identification, if any. It is obtained 
from the name field of the first named TITLE statement. The assembler 
prints the deck identification and date {item 16) on every page of the 
listing. 


“SAMPLE LISTING INFORMATION”: The information taken from the 
operand field of a TITLE statement. 


“PAGE 2”: The listing page number. 
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LOC: The assembled address (in hexadecimal notation) of the object 
code. 


¢ For ORG statements, the location-counter value before the ORG is 
placed in the location column and the location counter value after the 
ORG is placed in the object code field. 


e If the END statement contains an operand, the operand value 
(transfer address) appears in the location field (LOC). 


e In the case of LOCTR, COM, CSECT, and DSECT statements, the 
location field contains the current address of these control sections. 


e In the case of EXTRN, WXTRN, ENTRY, and DXD instructions, the 
location field and object code field are blank. 


¢ For a USING statement, the location field contains the value of the 
first operand. It is 4 bytes long. 


¢ For LTORG statements, the location field contains the location 
assigned to the literal pool. 


e For an EQU statement, the location field contains the value assigned. 
It is 4 bytes long. 


OBJECT CODE: The object code produced by the source statement. The 
entries are always left-justified. The notation is hexadecimal. Entries 
are machine instructions or assembled constants. Machine instructions 
are printed in full with a blank inserted after every 4 digits (2 bytes). 
Only the first 8 bytes of a constant will appear in the listing if PRINT 
NODATA is in effect, unless the statement has continuation cards. The 
entire constant appears if PRINT DATA is in effect. (See the PRINT 
assembler instruction in Assembler H Version 2 Language Reference.) 


ADDR1 ADDR2: Effective addresses (each the result of adding a base 
register value and a displacement value): 


e The field headed ADDR1 contains the effective address for the first 
operand of an SS instruction. 


e The field headed ADDR2 contains the effective address of the last 
operand of any instruction referencing storage. 


Both address fields contain 6 digits; however, if the high-order digit is a 
O, it is not printed. 


STMT: The statement number. A plus sign (+) to the right of the 
number indicates that the statement was generated as the result of 
macro Call processing. An unnumbered statement with a plus sign (+) 
is the result of open code substitution. 


SOURCE STATEMENT: The source program statement. The following 
items apply to this section of the listing: 


e Source statements are listed, including those brought into the 
program by the COPY assembler instruction, and including macro 
definitions submitted with the main program for assembly. Listing 
control instructions are not printed, except for PRINT, which is always 
printed. 


e Macro definitions obtained from SYSLIB are not listed, unless the 
macro definition is included in the source program by means of a 
COPY statement. 
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e The statements generated as the result of a macro call follow the 
macro Call in the listing, unless PRINT NOGEN is in effect. 


e Assembler and machine instructions in the source program that 
contain variable symbols are listed twice: as they appear in the 
source input, and with values substituted for the variable symbols. 


e All error diagnostic messages appear in line except those sup- 
pressed by the FLAG option. “Chapter 3. Using the Assembler Diag- 
nostic Facilities” describes how error messages and MNOTEs are 
handled. 


e Literals that have not been assigned locations by LTORG statements 
appear in the listing following the END statement. Literals are identi- 
fied by the equal sign (=) preceding them. 


e Whenever possible, a generated statement is printed in the same 
format as the corresponding macro definition (model) statement. The 
Starting columns of the operation, operand, and comments fields are 
preserved, unless they are displaced by field substitution, as shown 
in the following example: 


Name Operation Operand Comment 

&C SETC 'ABCDEFGHIJK' Source statement 
&C LA 1,4 Source statement 
ABCDEFGHIJK LA 1,4 Generated statement 


It is possible for a generated statement to occupy ten or more contin- 
uation lines on the listing. In this way, generated statements are 
unlike source statements, which are restricted to nine continuation 
lines. 


“ASM H V 02”: The version identifier of Assembler H. 
“18.48 07/16/87”: The current date (date run is made). 


(4) “02-IHBIN”: The identification-sequence field from the source statement. 
For a macro-generated statement, this field contains information identi- 
fying the origin of the statement. The first two columns define the level 
of the macro call. 


For a library macro call, the last five columns contain the first five characters of 
the macro name. For a macro whose definition is in the source program 
(including one read by a COPY statement), the last five characters contain the 
line number of the model statement in the definition from which the generated 
statement is derived. This information can be an important diagnostic aid in 
analyzing output resulting from macro calls within macro calls. 
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Relocation Dictionary (RLD) 


This section of the listing contains the relocation dictionary information passed 
to the linkage editor in the object module. The entries describe the address 
constants in the assembled program that are affected by relocation. This 
section helps you find relocatable constants in your program. 


(5) POS.ID: The external symbol dictionary ID number assigned to the ESD 
entry for the control section in which the address constant is used as an 
operand. 


REL.ID: The external symbol dictionary ID number assigned to the ESD 
entry for the control section in which the referenced symbol is defined. 


FLAGS: The 2-digit hexadecimal number represented by the characters 
in this field is interpreted as follows: 


First Digit: 


e Q indicates that the entry describes an A-type or Y-type address con- 
stant 

* 1 indicates that the entry describes a V-type address constant 

e 2 indicates that the entry describes a Q-type address constant 

e 3 indicates that the entry describes a CXD entry 


Second Digit: The first three bits of this digit indicate the length of the 
constant and whether the base should be added or subtracted: 


Bits 0 and 1 Bit 2 Bit 3 

00 = 1 byte O= + Always 0 
01 = 2 bytes 1=- 

10 = 3 bytes 

11 = 4 bytes 


ADDRESS: The assembled address of the field where the address con- 
stant ts stored. 


Chapter 2. Using the Assembler Listing 11 


Symbol and Literal Cross-Reference 


This section of the listing concerns symbols and literals that are defined and 
used in the program. This is a useful tool in checking the logic of your 
program; it helps you see if your data references and branches are in order. 





(6) SYMBOL: The symbols or literals. 


LEN: The length, in bytes (in decimal notation), of the field represented 
by the symbol. 


VALUE: Either the address that the symbol or literal represents, or a 
value to which the symbol is equated. The value is 3 bytes long, except 
for the following, which are 4 bytes long: CSECT, DSECT, START, COM, 
DXD, EQU, LOCTR, EXTRN, WXTRN, and a duplicate symbol. 


DEFN: The number of the statement in which the symbol or literal was 
defined. 


REFERENCES: The statement numbers of statements in which the 
symbol or literal appears as an operand. In the case of a duplicate 
symbol or literal, the assembler fills this column with the message: 


«**xDUPLICATE**** 
The following notes apply to the cross-reference section: 


Notes: 


1. The statement numbers in the DEFN and REFERENCES columns may have 
4,5, or 6 print positions. The number of print positions for the statement 
number will be chosen based on the highest statement number assigned for 
the assembly. For example, if 21056 is the highest statement number used 
in an assembly, all statement numbers in the cross-reference listing will 
have 5 print positions. 





2. Symbols appearing in V-type address constants do not appear in the cross- 
reference listing. 


3. Cross-reference entries for symbols used in a literal refer to the assembled 
literal in the literal pool. Look up the literals in the cross-reference to find 
where the symbols are used. 


4. A PRINT OFF listing control instruction does not affect the production of the 
cross-reference section of the listing. 


5. In the case of an undefined symbol, the assembler fills columns LEN, 
VALUE, and DEFN with the message: 


** UNDEFINED **** 
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Diagnostic Cross-Reference and Assembler Summary 


The diagnostic messages issued by the assembler are fully documented in 
Appendix D, “Assembler H Messages.” 


(7) 


(10) 


The statement number of each statement flagged with an error message 
or MNOTE appears in this list. The number of statements flagged and 
the highest nonzero severity code encountered are also printed. The 
highest severity code is equal to the assembler return code. 


If no errors are encountered, the following statement is printed: 
NO STATEMENTS FLAGGED IN THIS ASSEMBLY 


See “Chapter 3. Using the Assembler Diagnostic Facilities” for a com- 
plete discussion of how error messages and MNOTEs are handled. 


A list of the options in effect for this assembly is printed. The options 
specified in the PARM field to override the assembler default options are 
also printed. 


If the assembler has been called by a problem program (see “Invoking 
the Assembler Dynamically” on page 52) and any standard (default) 
ddnames have been overridden, both the default ddnames and the over- 
riding ddnames are listed. Otherwise, this statement appears: 


NO OVERRIDING DD NAMES 


The assembler prints the number of records read from SYSIN and 
SYSLIB and the number of records written on SYSPUNCH. The assem- 
bler also prints the number of lines written on SYSPRINT. This is a count 
of the actual number of 121-byte records generated by the assembler; it 
may be less than the total number of printed and blank lines appearing 
in the listing if the SPACE n assembler instruction is used. For a SPACE 
n that does not cause an eject, the assembler inserts n blank lines in the 
listing by generating n/3 blank 121-byte records, rounded to the next 
lower integer if a fraction results. For example, for a SPACE 2, no blank 
records are generated. The assembler does not generate a blank record 
to force a page eject. 
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Chapter 3. Using the Assembler Diagnostic Facilities 


The diagnostic facilities for Assembler H include diagnostic messages for 
assembly errors, diagnostic or explanatory messages issued by the source 
program or by macro definitions (MNOTEs), a macro trace and dump facility 
(MHELP), and messages and dumps issued by the assembler in case it termi- 
nates abnormally. 


This chapter briefly describes these facilities. The assembly error diagnostic 
messages and abnormal! assembly termination messages are described in 
detail in Appendix D, “Assembler H Messages.” 


Assembly Error Diagnostic Messages 


Assembler H prints most error messages in the listing immediately following 
the statement in error. It also prints the total number of flagged statements and 
their line numbers in the diagnostic cross-reference section at the end of the 
listing. 


The messages do not follow the statement in error when: 


e Errors are detected during editing of macro definitions read from a library. 
A message for such an error appears after the first call in the source 
program to that macro definition. You can, however, bring the macro defi- 
nition into the source program with a COPY statement. The editing error 
messages will then be attached to the statements in error. 


e Errors are detected by the lookahead function of the assembler. 
(Lookahead scans, for attribute references, statements after the one being 
assembled.) Messages for these errors appear after the statements in 
which they occur. The messages may also appear at the point at which 
lookahead was called. 


e Errors are detected on conditional assembler statements during macro gen- 
eration or MHELP testing. Such a message follows the most recently gen- 
erated statement or MHELP output statement. 


A typical error diagnostic message is: 
IEVO57) =***ERROR*** UNDEFINED OPERATION CODE—xxxxx 


The term ***ERROR*** is part of the message if the severity code is 8 or 
greater. The term **WARNING"™ its part of the message if the severity code is 0 
or 4. 


A copy of a segment of the statement in error, represented above by xxxxx, Is 
appended to the end of many messages. Normally this segment, which can be 
up to 16 bytes long, begins at the bad character or term. For some errors, 
however, the segment may begin after the bad character or term. The segment 
may include part of the remarks field. 
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lf a diagnostic message follows a statement generated by a macro definition, 
the following items may be appended to the error message: 


¢ The number of the model statement in which the error occurred, or the first 
five characters of the macro name. 





e The SET symbol, parameter number, or value string associated with the 
error. 


Note: References to macro parameters are by number (such as PARAMO08) 
instead of by name. The first seven numbers are always assigned for the 
standard system parameters as follows: 


PARAMOOO &SYSNDX 

PARAMOO1] = &SYSECT 

PARAMOO2 = &SYSLOC 

PARAMOO3 = &SYSTIME 

PARAMOO4 = &SYSDATE 

PARAMO05 = &SYSPARM 

PARAMOO6 = Name Field Parameter 


Then the keyword parameters are numbered in the order defined in the macro 
definition, followed by positional parameters. When there are no keyword 
parameters in the macro definition, PARAMO07 refers to the first positional 
parameter. 


If a diagnostic message follows a conditional assembler statement in the 
source program, the following items will be appended to the error message: 


The word “OPENC” 
The SET symbol or value string associated with the error 





several messages may be issued for a single statement or even for a single 
error within a statement. This happens because each statement is usually eval- 
uated on more than one level (for example, term level, expression level, and 
operand level) or by more than one phase of the assembler. Each level or 
phase can diagnose errors; therefore, most or all of the errors in the statement 
are flagged. Occasionally, duplicate error messages may occur. This is a 
normal result of the error detection process. 


Figure 3 0n page 17 is an example of Assembler H handling of error mes- 
sages. 


MNOTE Statements 


An MNOTE statement is included in a macro definition or in the source 
program. It causes the assembler to generate an inline error or informational 
message. 


An MNOTE appears in the listing as follows: 
IEV254 ***MNOTE*** severity code, message 


Unless it has a severity code of * or the severity code is omitted, the statement 
number of the MNOTE is listed in the diagnostic cross-reference. 
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Loc OBJECT CODE 


000000 

000000 0000 0000 
TEVO044 ‘*** ERROR 
§EV0O29 see ERROR 
IEVL79 ¢#¢ ERROR 

000004 05CO0 

000006 0000 0000 
TEV044 #8 ERROR 
IEVO8S *¢¢ ERROR 

OO0000A 0700 


Q0000C 4510 COOF 
900010 00000000 
000014 0000 0000 


TEVO2Z9 *** ERROR 

TEVO44 **8 ERROR 

TEVI77 #8 ERROR 
000018.9280 1000 
OOoOoOo1Cc OAL3 


LEVL36 &¢** ERROR 
IEVO82 Fe8 ERROR 
OOOOLE S8AO CO2A 


000022 0000 0000 
IEVO29 S48 ERROR 


000026 3800 CO7E 


Q0000C 5B8A0 C004 
000010 5880 C008 


fEV0O0O3 *e8 ERROR 
000014 0000 0000 
IEVO29 *** ERROR 
000018 0000 0000 
IEVO7T% *€¢¢ ERROR 
1€V254 86 MNOTE 


ANDNR1 ADOR2 STMT SUUKCF STATEMAFNT ASM H V 02 11.51 09/30/82 
] SHRESSSHES SSE SSHSHESS SESE SSSTHSE SHS SSSSESSSESS SES SSSSSSHSHSSESESESSSSSSSSSS 
2 > SAMPLE ERROR DIAGNOSTIC MESSAGES a4 
3 ¢ IN SOURCE PRUGRAM (OPEN CODE) AND GENERATED BY MACRO CALLS . 
G SHHCHSEHSSSEESSSSHESESSSESEE SES SS HS SESHCHSSEESS SERSSHS SES SSEESEHESESSESESSED 
6 A CSECT 

00000 qT STM 14,UZ2e12(1 31 
eee UNCEFINED SYMBUL 
eee INCORRECT REGISTER SPECIFICATIUN 


*e¢ DELIMITER ERROR, EXPECT RIGHT PARENTHESIS 
8 BAL® 12,0 
00006 9 USING ®,12 
00000 10 ST 13 SAVE 44 
eee UNDEFINED SYMBOL 
ll OPEN (CRIIN» (INPUT) »CRDOUT, (OUTPUT) 
*ee UNBALANCED PARENTHESES IN MACRO CALL OPERAND -- OPENC/(CRDIN, (IN 
12+ CNOP (O¢4 01-OP EN 
00014 13¢ BAL 1, *¢y LOAD REGL W/LIST AODR. O1-OPEN 
14+ OC A(O) OPT BYTE AND OCB ADDR. 01-O0PEN 
00000 15¢ ST CRODIN, CINPUT) pCROOUT, (OUTPUT ,0(1,0) XO1-OP EN 
e STORE INTO LIST 
eee INCORRECT REGISTER SPECIFICATIUN 
eee UNDEFINED SYMBOL 
eee DELIMITER FRRUR, EXPECT BLANK OR LEFT PARENTHESIS 
00000 16+ MVI O(L1,128 MOVE IN OPTION BYTE O1-OPEN 
17+ SVC 19 ISSUE OPEN SVC 01-OPEN 
19 SHKSSSSEKSSSSSHESSHSESSESSSSSSSSHESSESSESEEESESHESSEESESE SEES SSESESSESEEEESESESSSSESSESS 
20 EDITING AND GENERATION ERRORS AND MNOTES FROM A LIBRARY MACRO *® 
21 SSSHSSSSSSSE SE SSSSSSSESSSSSSSSSSSSESS SEES SSSESSSSSSHSSSSSHSSE SSS SSSESESSESESSSSSS 
23 LOADR REGL=1LO,REG2=8, CHEROKEE eC HAMP 
eee ILLEGAL LUGICAL/RELATIONAL OPERATUR -- MACRU — LUADR 
ee ARITHMETIC EXPRESSION CUNTAINS ILLEGAL DELIMITER UR ENDS PREMATURELY -- MACRO —- LOADR 
90030 24+ L 10,CHEROKEE 01-LOADR 
26 LIOADR REGL=25,REG2=8,CHEROKEE » SWIFT 
00000 27+ tL 25 pCHERUKEE O1-LOAOR 
eee [NCORRECT REGISTER SPECIFICATION 
29 LUADR KEG2=10,CHAMP, SWIFT 
09034 30+ L O,CHAMP 01-LOADR 
G& SSHSSHSSSSESSSSSSSESESSSS SSSESESSESSSESESS SESS ELSEESSESESEEESES SESE SHSSSSESSSSESSSESES SS 
7 * SAMPLF MACK&O NEF INITION RERUN WITH EDITING ERRORS CORRECTED * 
AR SKHSSHKESSSSSSSSSSSHESSSESSS CSE SSSSESS SESS SESSSS SHSKSSSSSEEESSESSSRSSSSSSSSSs 
10 MACRU 
11 E&NAME LOADR EREGI1=,EREG22,EU0P1 »EUP2 
12 &R(1L) SETA EREG]L, EREG2 
13 AIF (TTEREGL EQ 'O*). ERR 
14 L ER(1),60P1 
15 L ER (2). E0P2 
16 MEXIT 
17 .ERR MNUTE 36,°YQU LEFT OUT THE FIRST REGISTER® 
18 MEND 
ZO SHSHSSSSSSSSSSSSSSSSSSSSSSESSE SHEETS SESS SSSSSSSESSSEESSSSESSESEKESSSESESESESSESSR 
2. SAMPLE MACRO CALLS WITH GENERATION ERRORS AND MNOTES e 
Zl SSSSSSSSESSSSESSSSEHPSSSTSSSESSESSESESSSSE SESS SSE SSESSSE SESSESESSSESSSRESSSSESSSSS 
24 LOADR REGL=10,REG2 28, CHEROKEE » CHAMP 
0n004 2%e L 10 ,CHEROKEE 01-00014 
00008 26+ L §,CHAFP 01-00015 
28 LUOAUR REGL=25,REG2 "8, CHEROKEE p ESWIFT 
eee UNDECLARED VARIABLE SYMBOL. DEFAULT=0, NULL» UR TYPE=U -- OPENC/SWIFT 
00000 294 L 25, CHEROKEE 01-00014 
eee INCORRECT REGISTER SPECIFICATION 
00000 30¢ L B 01-00015 
eee ILLEGAL SYNTAX IN EXPRESSION 
32 LUADR REG2=8,CHAMP, SWIFT 
eee 3434 36-¢YOU LEFT OUT THE FIRST REGISTER 01-00017 
34 END 





Figure 3. Sample Error Diagnostic Messages 
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Suppression of Error Messages and MNOTE Statements 


Optionally, error messages and MNOTE statements below a specified severity 
level can be suppressed by specifying the assembler option ‘FLAG(n)’ (where 
“n” is the selected severity level when the assembler is invoked). 


Abnormal Assembly Termination 


MHELP—Macro 


Whenever the assembly cannot be completed, Assembler H provides a 
message and, in some cases, a specially formatted dump for diagnostic infor- 
mation. This may indicate an assembler malfunction or it may indicate a pro- 
grammer error. The statement causing the error is identified and, if possible, 
the assembly listing up to the point of the error is printed. 

Appendix D, “Assembler H Messages” on page 111 describes the abnormal 
termination messages. The messages give enough information to enable you 
(1) to correct the error and reassemble your program, or (2) to determine that 
the error is an assembler malfunction. 


Assembler H Version 2 Logic contains a com plete explanation of the format and 
contents of the abnormal termination dump. 


Trace Facility 


The MHELP instruction controls a set of trace and dump facilities. Options are 
selected by an absolute expression in the MHELP operand field. MHELP state- 
ments can occur anywhere in open code or in macro definitions. MHELP 
options remain in effect until superseded by another MHELP statement. 


Format of MHELP: 


Name Operation Operand 


MHELP Absolute expression, binary or decimal options 
(see below) 


MHELP B’1’ or MHELP1, Macro Call Trace: This option provides a one-line 
trace listing for each macro call, giving the name of the called macro, its nested 
depth, and its &5YSNDX value. The trace is provided only upon entry into the 
macro. No trace is provided if error conditions prevent entry into the macro. 


MHELP B’10’ or MHELP2, Macro Branch Trace: This option provides a one-line 
trace-listing for each AGO and AIF conditional assembly branch within a macro. 
It gives the model statement numbers of the “branched from” and the 
“branched to” statements, and the name of the macro in which the branch 
occurs. This trace option is suppressed for library macros. 


MHELP B’100’ or MHELP 4, Macro AIF Dump: This option dumps undimen- 
Sioned SET symbol values from the macro dictionary immediately before each 
AIF statement that is encountered. 
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MHELP B’1000’ or MHELP 8, Macro Exit Dump: This option dumps undimen- 
sioned SET symbols from the macro dictionary whenever an MEND or MEXIT 
statement is encountered. 


MHELP B’10000’ or MHELP 16, Macro Entry Dump: This option dumps param- 
eter values from the macro dictionary immediately after a macro call iS proc- 
essed. 


MHELP B’100000’ or MHELP 32, Global Suppression: This option suppresses 
global SET symbols in two preceding options, MHELP 4 and MHELP 8. 


MHELP B’1000000’ or MHELP 64, Macro Hex Dump: This option, when used in 
conjunction with the Macro AIF dump, the Macro Exit dump or the Macro Entry 
dump, will dump the parameter and SETC symbol values in EBCDIC and 
hexadecimal formats. Only positional and keyword parameters will be dumped 
in hexadecimal, system parameters will be dumped in EBCDIC. The full value 
of SETC variables or parameters is dumped in hexadecimal. 


MHELP B’10000000’ or MHELP 128, MHELP Suppression: This option sup- 
presses all currently active MHELP options. 


MHELP Control on &SYSNDX: The MHELP operand field is actually mapped into 
a fullword. Previously defined MHELP codes correspond to the fourth byte of 
this fullword. 


&SYSNDX control is turned on by any bit in the third byte (operand values 256 
through 65535, inclusive). Then, when &SYSNDX (total number of macro calls) 
exceeds the value of the fullword which contains the MHELP operand value, 
control is forced to stay at the open code level by, in effect, making every state- 
ment in a macro behave like a MEXIT. Open code macro calls are honored, but 
with an immediate exit back to open code. When the value of &SYSNDX 
reaches its limit, the message “ACTR EXCEEDED—&SYSNDX’ is issued. 


Examples: 
MHELP 256 Limit &SYSNDX to 256. 
MHELP 1 Trace macro calls. 


MHELP 256+1 Trace calls and limit &SYSNDX to 257. 
MHELP 65536 No effect. No bits in bytes 3,4. 
MHELP 65792 Limit &SYSNDX to 65792. 
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Part 2. OS/VS Information 


“Chapter 4. Using the Assembler” reviews the concepts of job, job step, 
and job control language; describes assembler input and output; tells how 
the operating system handles your program; describes the assembler 
options, the data sets used by the assembler, the number of channel pro- 
grams, and return codes; and the job control language cataloged proce- 
dures supplied by IBM. The cataloged procedures can be used to 
assemble, link-edit or load, and execute an assembler program. 


“Chapter 5. Programming Considerations” discusses various topics, such 
as Standard entry and exit procedures for problem programs and how to 
invoke the assembler dynamically. 


“Chapter 6. Calculating Storage Requirements” describes the priorities and 
use of main storage by Assembler H during an assembly. 
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Chapter 4. Using the Assembler 


Input 


This chapter describes assembler input and output; tells how the operating 
system handles your program; reviews the concepts of job, job step, and job 
control language; shows you how to invoke the assembler for simple jobs 
(using cataloged procedures); and lists the job control statements that make up 
the four assembler cataloged procedures. In addition, it describes the 
assembly-time options available to the assembler language programmer; data 
sets used by the assembler; and number of channel programs, return codes, 
and cataloged procedures of job control language supplied by IBM to simplify 
assembling, link-editing or loading, and execution of assembler language pro- 
grams. The job control language is described in detail in the appropriate JCL 
Reference. 


As input, the assembler accepts a program written in the assembler language 
as defined in Assembler H Version 2 Application Programming: Language Ref- 
erence. This program is referred to aS a Source module. Some statements in 
the source module (macro or COPY instructions) may cause additional input to 
be obtained from a macro library. 


Output 


The output from the assembler consists of an object module and a program 
listing. The object module can either be punched or included in a data set 
residing On a direct access device or a magnetic tape. From that data set, the 
Object module can be read into the computer and processed by the linkage 
editor or the loader. See Appendix C, “Object Deck Output” for the format of 
the object module. 


The program listing lists all the statements in the module, both in source arid 
machine language format, and gives other important information about the 
assembly, such as error messages. The listing is described in detail in 
“Chapter 2. Using the Assembler Listing.” 


How the Operating System Handles Your Program 


Once you have coded and entered your program, it must be processed by the 
assembler and the linkage editor or the loader before it can be executed. 
Figure 4 0n page 24 shows how the operating system handles your program. 
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Figure 4. How the Operating System Handles Your Program 
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The assembler translates your source module into an object module, the 
machine language equivalent of the source module. The object module, 
however, is not ready for execution; it must first be processed by the linkage 
editor or loader. 


The linkage editor prepares your program for execution. The output of the 
linkage editor is called a load module and can be executed by the computer. 
The linkage editor can combine your program with other object and load 
modules to produce a single load module. The linkage editor stores your 
program in a load module library, a collection of data sets on a direct access 
device. These load modules can be read into the computer and given control. 
The load module library may be either permanent, so that you can execute your 
program in later jobs, or temporary, so that the program is deleted at the end 
of your job. 


Program 

Once you have included your program in a permanent load module library, you 
can execute it any number of times without assembly and link-editing. 
However, if you need to change your program, you must assemble and link-edit 
it again. Therefore, you should not store your program in a permanent load 
module library until it has been tested properly. To save time during test runs, 
you Can use a program that combines the basic functions of the linkage editor 
with the execution of your program. That program is the loader. 
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Loader 


The loader performs most of the functions of the linkage editor; in addition, it 
loads your program into the computer and passes control to your program. The 
loader cannot, however, include your program in a load module library. Fora 
full description of the linkage editor and loader, refer to the appropriate linkage 
editor and loader manual. 


Job Control Language 


Jobs and Job Steps 


Job 
Assembly 
and 

Link 
Editing 


Each time you request a service from the operating system, you are asking it to 
perform a job. A job may consist of several steps, each of which usually 
involves the execution of one processing program under the control of the oper- 
ating system’s control program. For example, if you submit a job to the com- 
puter calling for assembly and linkage editing of a program, that job will be a 
two-step job. The concepts of jobs and job steps are shown in Figure 5. 
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Figure 5. Jobs and Job Steps 
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Job Control Language 
The job contro! language is your way of communicating to the operating system 
control program what services you want used. Job control language state- 
ments are usually punched into cards and supplied in the job stream with your 
source module and other data needed by the job. For a detailed discussion of 
job control language statements, see the appropriate JCL Reference. 





To save time and trouble, you can use predefined sets of JCL statements that 
reside in a library. Such a set of statements, called a cataloged procedure, can 
be included in your job by means of a single JCL statement naming the set. 
Figure 6 shows the concept of a cataloged procedure. 


There are several cataloged procedures available for assembler jobs. They are 
described in the following sections. 
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Figure 6. Cataloged Procedure Concept 
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Job Control Statements for Assembler Jobs 


Simple Assembly 


Assembly 


The following sections show you how to invoke the assembler for simple jobs, 
using cataloged procedures, and list the job control statements that make up 
the four assembler cataloged procedures. 


and Execution 
This section gives the minimum JCL statements needed for two simple 
assembly jobs: 


e Assembly of your program to produce a listing and an object deck 
e Assembly and execution of your program 


Both jobs use cataloged procedures to call the assembler. 


To assemble your program, use the following JCL statements: 


//jobname JOB  accountno,progrname MSGLEVEL=1 (1) 
// EXEC ASMHC (2) 
//SY¥SIN DD * (3) 


(your source program) 


Notes: 


1. Identifies the beginning of your job to the operating system. ‘jobname’ is 
the name you assign to the job. ‘accountno’ specifies the account to which 
your job is charged, and ’progrname’ is the name of the programmer 
responsible for the job. “MSGLEVEL=1’ specifies that the job control state- 
ments connected with this job are to be listed. Check what parameters are 
required at your installation and how they must be specified. 


2. Calls the cataloged procedure ASMHC. Asa result, a number of job control 
statements are included in the job from the procedure library. ASMHC is 
described under “Cataloged Procedure for Assembly (ASMHC)” on 
page 38; an expanded job stream is shown there. 


3. Specifies that the assembler language source program follows immediately 
after this statement. 


These statements cause the assembler to assemble your program and to 
produce a listing (described in “Chapter 2. Using the Assembler Listing”) and 
an object module punched on cards (described in Appendix C, “Object Deck 
Output”). If you do not want any object module cards to be punched during the 
job, use the following statements: 


//jobname JOB accountno,progrname,MSGLEVEL=1 
// EXEC ASMHC,PARM=NODECK 
//SY¥SIN DD x 


(your source program) 


Note: The second parameter (PARM) specifies the assembler option NODECK, 
which tells the assembler not to produce any punched object module on 
SYSPUNCH. For a full discussion of assembler options, see “Assembler H 
Options” on page 29. 
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Examples: 


, PARM=DECK Only one option specified. ™ 





,PARM='LINECOUNT (40) ' LINECOUNT, FLAG, SYSPARM, and 
XREF must be surrounded by 
Single quotation marks. 


, PARM= (DECK, NOOBJECT ) More than one option is specified. 
or None of them require quotation 
»PARM= 'DECK,NOOBJECT ' marks. 


»PARM= 'DECK,NOLIST,SYSPARM(PARAM)' More than one option is specified. 


or SYSPARM must appear within 
»PARM=(DECK,NOLIST, 'SYSPARM(PARAM)') quotation marks. 
or 


»PARM=(DECK, 'NOLIST,SYSPARM(PARAM) ') 


,PARM=(DECK,NOLIST, 'LINECOUNT(35)', The whole field must be enclosed in 
NOALIGN,NORLD) parentheses because it is continued onto 
another card. The LINECOUNT option must 
be within single quotation marks, 
and the portions of the field that are 
enclosed within quotation marks cannot 
continue onto another card. 


Note: Even though the formats of some of the options previously supported by 
Assembler H have been changed, you can use the old formats for the following 
options: 

ALGN (now ALIGN), NOALGN (NOALIGN), LINECNT=nn (LINECOUNT(nn)), 


LOAD (OBJECT), NOLOAD (NOOBJECT), MULT (BATCH), NOMULT (NOBATCH), 
XREF (XREF(FULL)), and MSGLEVEL=nn (FLAG(nnn)). 





The IBM-supplied option defaults are underlined in the list below. 


ALIGN | NOALIGN 
specifies whether or not alignment checking is done. 


If ALIGN is specified, the assembler does not suppress the alignment error 
diagnostic message; all alignment errors are diagnosed. 


If NOALIGN is specified, the assembler suppresses the diagnostic message 
“IEVO33 ALIGNMENT ERROR?” if fixed point, floating point, or logical data 
referred to by an instruction operand is not aligned on the proper boundary. 
The message will be produced, however, for references to instructions that 
are not aligned on the proper (halfword) boundary or for data boundary vio- 
lations for privileged instructions such as LPSW. In addition, DC, DS, DXD, 
or CXD constants, usually causing alignment, are not aligned. 


BATCH | NOBATCH 
specifies single or multiple assemblies. 


If BATCH is specified, the assembler will do multiple (batch) assemblies 
under the control of a single set of job control language cards. The source 
decks must be placed together with no intervening /* card; a single /* card 
must follow the final source deck. 


If NOBATCH is specified, the BATCH option is suppressed. 
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C 


DBCS | NODBCS 
specifies whether or not the assembler will accept double-byte data, as 
summarized in Assembler H Version 2 Language Reference for details on 
how to program for double-byte data. 


DECK | NODECK 
specifies whether or not the object module is placed on the device specified 
in the SYSPUNCH DD statement. 


ESD | NOESD 
specifies whether or not the assembler will print an ESD (external symbol 
dictionary) with the listing. 


FLAG(n | 0) 
specifies the message level—the lowest severity code for which error mes- 
sages are to be printed during assembly. Error diagnostic messages below 
severity code n will not appear in the listing, and will not be used to set a 
condition code. Diagnostic messages can have a severity code of 0, 4, 8, 
12, 16, or 20 (0 is the least severe). MNOTEs can have a severity code of 0 
through 255. 


Example: FLAG(8) will suppress messages for severity codes 0 through /. 


LINECOUNT(n | 55) 
specifies the number of lines to be printed between headings. The permis- 
sible range is 1 to 3276/7 lines. 


LIST | NOLIST 
specifies whether or not an assembler listing is printed. 


NOLIST overrides the options ESD, RLD, XREF, and LINECOUNT. 


OBJECT | NOOBJECT 
specifies whether or not an object module is placed on the device specified 
in the SYSLIN DD statement. 


The OBJECT and DECK options are independent of each other. Both or 
neither can be specified. The output on SYSLIN and SYSPUNCH is iden- 
tical, except that the control program closes SYSLIN with a disposition of 
LEAVE, and SYSPUNCH with a disposition of REREAD. 


RENT | NORENT 
specifies whether or not the assembler checks for a possible coding vio- 
lation of program reenterability. Non-reentrant code is identified by an 
error message, but is not exhaustively checked, because the assembler 
cannot check the logic of the code. Therefore, it is possible to have 
nonreentrant code not flagged. 


RLD | NORLD 
specifies whether or not the assembler prints an RLD (relocation dictionary) 
as part of the listing. 


SYSPARM(char-string | empty-string) 
specifies the character string to be used as the default value of the 
&SYSPARM system variable symbol. The assembler uses &SYSPARM as a 
read-only SETC variable. The function of &SYSPARM is explained in 
Assembler H Version 2 Language Reference. 
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Because of JCL restrictions, the length of the SYSPARM value is limited (as 
explained in Note below). Two single quotation marks are needed to repre- 
sent a single quotation mark, and two ampersands to represent a single 
ampersand. For example: 


PARM= ' OBJECT , SYSPARM( (&&AM,''EO).FY)' 





assigns the following value to &SYSPARM: 
(RAM, 'EO) .FY 


Any parentheses inside the string must be paired. If you call the assembler 
from a problem program (dynamic invocation), SYSPARM can be up to 256 
characters long; otherwise, it is limited to 56 characters (see Note below). 


The default is SYSPARM(). 


Note: The restrictions imposed upon the PARM field limit the maximum 
length of the SYSPARM value to 56 characters, unless you use symbolic 
procedure parameters to substitute for the value, or the value contains 
commas that can be used as breaking points between cards. Consider the 
following example (the underlined characters indicate columns 1, 4, 13, and 
68, respectively): 


// EXEC ASMHC,PARM=(QBJECT ,NODECK, 
i PSYSPARI ABCD ick Gots Olean lit cdecw vada oGitae lng ) 


Because SYSPARM uses parentheses, it must be surrounded by single quo- 

tation marks. Thus, it cannot be continued onto a continuation card. The 

leftmost column that can be used is column 4 on a continuation card. A 

quotation mark and the keyword, as well as the closing quotation mark, 

must appear on that line. In addition, either a right parenthesis, indicating 

the end of the PARM field, or a comma, indicating that the PARM field is was 
continued on the next card, must be coded before or in the last column of 

the statement field (column 71). 


TERM | NOTERM 
specifies whether or not a summary of error diagnostics is written to the 
SYSTERM data set for use in sending error messages to a TSO terminal. 


TEST | NOTEST 
specifies or not the object module contains the special source symbol table 
required by the test translator (TESTRAN) routine. 


TEST is ignored if both NODECK and NOOBJECT are specified. 


XREF(FULL) | XREF(SHORT) | NOXREF 
specifies whether or not cross-reference information is listed. 





If XREF(FULL) is specified, the assembler listing contains a cross-reference 
table of all symbols used in the assembly. This includes symbols that are 
defined but never referenced. The assembler listing also contains a cross- 
reference table of literals used in the assembly. 


If XREF(SHORT) is specified, the assembler listing contains a cross- 
reference table of all symbols that are referred to in the assembly. Any 
symbols defined but not referred to are not included in the table. The 
assembler listing also contains a cross-reference table of literals used in 
the assembly. 


If NOXREF is specified, no cross-reference tables are printed. 
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Default Options 


The IBM-supplied option defaults are underlined in the list above. 


However, these may not be the default options in effect in your installation; the 
defaults can be respecified when Assembler H is installed. For example, 
NODECK can be made the default in place of DECK. Also, a default option that 
you cannot override can be specified during installation. 


The cataloged procedures described in this book assume the default entries. 
“Overriding Statements in Cataloged Procedures” on page 44 tells you how to 
override them. First, however, check whether any default options have been 
changed, or whether there are any you cannot override at your installation. 


Assembler Data Sets 


Assembler H requires the following data sets, as shown in Figure 7 on page 34: 


SYSUT1 A utility data set used as intermediate external storage when 
processing the source program. 

SYSIN An input data set containing the source statements to be proc- 
essed. 


In addition, the following five data sets may be required: 


SYSLIB A data set containing macro definitions (for macro definitions 
not defined in the source program) and/or source code to be 
called for through COPY assembler instructions. 


SYSPRINT A data set containing the assembly listing (unless the NOLIST 
option is specified). 


SYSTERM A data set containing essentially a condensed form of 
SYSPRINT, principally error flagged statements and their error 
messages (only if the TERM option is specified). 


SYSPUNCH A data set containing object module output, usually for 
punching (unless the NODECK option is specified). 


SYSLIN A data set containing object module output usually for the 
linkage editor (only if the OBJECT option is specified). 
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Figure 7. Assembler H Data Sets 


The data sets listed above are described in the text following Figure 8 on 

page 35 and Figure 9 on page 36. The ddname that normally must be used in 
the DD statement describing the data set appears as the heading for each 
description. The characteristics of these data sets, those set by the assembler 
and those you can override, are shown in Figure 8 and Figure 9. 
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SYSPRINT & 


Data Set SYSUT1 SYSPUNCH SYSTERM SYSLIN SYSIN SYSLIB 
Access BSAM BSAM BSAM BSAM BSAM BPAM 
Method 

Logical Fixed at Fixed at 80 Fixed at121 Fixed at Fixed at Fixed at 
Record BLKSIZE 80 80 80 
Length 

(LRECL) 

Block Size (1) (2) (2) (2) (2) (3) 
(BLKSIZE) 

Record (4) (4,6) (5,6) (4,6) (4,6) (4,6) 
Format 

(RECFM) 

Number of (1) (7) (7) (7) (7) Not 
Channel Pro- Appli- 
grams (NCP) cable 


Figure 8. Assembler Data Set Characteristics 


Notes to Figure 8: 


1. 


N DOD oO sb 


You can specify a block size (BLKSIZE) between 2008 and 5100 bytes in the 
DD statement or in the data set label. BLKSIZE should be a multiple of 8: if 
it is not, it will be rounded to the next lower multiple of 8. If you do not 
specify BLKSIZE, the assembler sets a default block size based on the 
device used for SYSUT1. 


“Chapter 6. Calculating Storage Requirements” discusses the reasons for 
changing the default block size. 


. If specified, BLKSIZE must equal LRECL or a multiple of LRECL. If BLKSIZE 


is not specified, it is set equal to LRECL. If BLKSIZE is not a multiple of 
LRECL, it is truncated. 


Refer to the appropriate Linkage Editor and Loader for the block size 
requirements of SYSPUNCH and SYSLIN, if they are used as input to the 
linkage editor. 


. BLKSIZE be specified in the DD statement or the data set label as a mul- 


tiple of LRECL. 


. Set by the assembler to F or FB if necessary. 
. Set by the assembler to FM or FBM if necessary. 


. You may specify B, S, or T. 


You can specify the number of channel programs (NCP) used by any 
assembler data set except SYSUT1 and SYSLIB. The NCP of SYSUT‘1 is 
fixed at 1. The assembler, however, can change your NCP specification 
under certain conditions. Figure 9 on page 36 shows how NCP is calcu- 
lated. 


If the NCP is greater than 2, chained |/O request scheduling is set by the 
assembler. 
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Unit Record No Unit 





Device Record Device 
NCP specified > 2! User specified User specified 
NCP specified = 1 Computed? User specified( = 1) 
NCP not specified Computed? Computed? 


Figure 9. Number of Channel Program (NCP) Selection 


Notes to Figure 9: 
1. If the NCP is greater than 2, chained I/O scheduling is set by the assembler. 


2. For SYSPRINT and SYSTERM data sets, the NCP set by the assembler is the 
larger of 1210/BLKSIZE or 2. For SYSIN data set, the NCP set by the 
assembler is the larger of 800/BLKSIZE or 2. For SYSLIN or SYSPUNCH 
data sets, the NCP set by the assembler is the larger of 240/BLKSIZE or 2. 


ddname SYSUT1: The assembler uses this utility data set as an intermediate 
external storage device when processing the source program. The input/output 
device assigned to this data set must be a direct-access device. The assem- 
bler does not support multivolume utility data sets. 


The following are the devices supported for this data set: 3330/3333, 3340/3344, 
3350, 3375, and 3380. 


ddname SYSIN: This data set contains the input to the assembler—the source 
statements to be processed. The input/output device assigned to this data set 
may be either the device transmitting the input stream, or another sequential 

input device that you have designated. The DD statement describing this data 
set appears in the input stream. The IBM-supplied procedures do not contain 
this statement. 





ddname SYSLIB: From this data set, the assembler obtains macro definitions 
and assembler language statements to be called by the COPY assembler 
instruction. It is a partitioned data set; each macro definition or sequence of 
assembler language statements is a separate member, with the member being 
the macro instruction mnemonic or COPY operand name. 


The data set may be defined as SYS1.MACLIB or your private macro definition 
or COPY library. SYS1.MACLIB contains macro definitions for the system 
macro instructions provided by IBM. Your private library may be concatenated 
with SYS1.MACLIB. The two libraries must have the same logical record length 
(80 bytes), but the blocking factors may be different. The DD statement for the 
library with the largest block size must appear first in the job control language 
for the assembly (that is, before any library DD statements). The appropriate 
JCL Reference explains the concatenation of data sets. 


ddname SYSPRINT: This data set is used by the assembler to produce a 
listing. Output may be directed to a printer, a magnetic tape, or a direct-access 
storage device. The assembler uses the machine code carrier control charac- 
ters for this data set. 
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ddname SYSTERM: This data set is used by the assembler to store a summary 
form of SYSPRINT containing flagged statements and their associated error 
messages. It is intended for output to a terminal, but can also be routed to a 
printer, a magnetic tape, or a direct-access storage device. The assembler 
uses the machine code carrier control character to skip to a new line for this 
data set. 


ddname SYSPUNCH: The assembler uses this data set to produce the object 
module. The input/output unit assigned to this data set may be either a card 
punch or an intermediate storage device capable of sequential access. 


ddname SYSLIN: This is a direct-access storage device, a magnetic tape, ora 
card punch data set used by the assembler. It contains the same output text as 
SYSPUNCH. It is used as input for the linkage editor. 


Number of Channel Programs (NCP) 


Return Codes 


The number of channel programs can be specified by the user or set by the 
assembler. The number will vary depending upon whether or not a unit record 
device is used. Figure 9 on page 36 shows how the NCP selection is made. 


Assembler H issues return codes for use with the COND parameter of the JOB 
and EXEC job control language statements. The COND parameter enables you 
to skip or to execute a job step, depending on the results (indicated by the 
return code) of a previous job step. It is explained in the appropriate JCL Ref- 
erence. 


The return code issued by the assembler is the highest severity code that is 
associated with any error detected in the assembly or with any MNOTE 
message produced by the source program or macro instructions. See 
Appendix D, “Assembler H Messages” for a listing of the assembler errors and 
their severity codes. 


Cataloged Procedures 


Often the same set of job control statements is used over and over again (for 
example, to specify the compilation, linkage editing, and execution of many dif- 
ferent programs). To save programming time and to reduce the possibility of 
error, sets of standard series of EXEC and DD statements can be prepared once 
and cataloged in a system library. Such a set of statements is termed a cata- 
loged procedure and can be invoked by one of the following statements: 


//stepname EXEC procname 
//stepname EXEC PROC=procname 


The specified procedure is read from the procedure library (SYS1.PROCLIB) 
and merged with the job control statements that follow this EXEC statement. 
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This section describes four IBM cataloged procedures: a procedure for assem- 
bling (ASMHC); a procedure for assembling and linkage editing (ASMHCL); a 
procedure for assembling, link-editing, and executing (ASMHCLG); and a proce- 
dure for assembling and loader executing (ASMHCG). 





Cataloged Procedure for Assembly (ASMHC) 
This procedure consists of one job step: assembly. The name ASMHC must be 
used to call this procedure. The result of execution is an object module, in 
punched card form, and an assembler listing. (See also “Simple Assembly and 
Execution” on page 27 for more details and another example.) 


In the following example, input enters via the input stream. An example of the 
statements entered in the input stream to use this procedure is: 


//jobname JOB 
//stepname EXEC PROC=ASMHC 
//SYSIN DD * 


source program statements 


/* (delimiter statement) 


The statements of the ASMHC procedure are read from the procedure library 
and merged into the input stream. 


Figure 10 shows the statements that make up the ASMHC procedure. wa 
//C EXEC PGH=IEV90,REGION=200K (1) 
//SYSLIB DD DSN=SYS1.NACLIB, DISP=SHR (2) 
//SYSUTI DD UNIT=(SYSDA, SEP=SYSLIB) , SPACE=(CYL, (10,5)) , DSN=&SYSUT1 (3) 
//SYSPUNCH DD SYSOUT=B, DCB= (BLKSIZE=800) , SPACE=(CYL, (5,5,0)) (4) 


//SYSPRINT = DD SYSOUT=A, DCB=(BLKSIZE=3509) ,UNIT=(,SEP=(SYSUT1,SYSPUNCH)) (5) 


Figure 10. Cataloged Procedure for Assembly (ASMHC) 


Notes to Figure 10: 


1. PARM= or COND= parameters may be added to this statement by the 
EXEC statement that calls the procedure (see “Overriding Statements in 
Cataloged Procedures”). The system name |JEV90 identifies Assembler H. 


2. This statement identifies the macro library data set. The data set name 
SYS1.MACLIB is an IBM designation. 


3. This statement specifies the assembler utility data set. The device class 
name used here, SYSDA, represents a direct-access unit. The I/O unit 
assigned to this name is specified by the installation when the operating 
system is generated. A unit name such as 3330 may be substituted for 
SYSDA. 


4. This statement describes the data set that will contain the object module 
produced by the assembler. 5 





5. This statement defines the standard system output class, SYSOUT =A, as 
the destination for the assembler listing. 
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Cataloged Procedure for Assembly and Linkage Editing (ASMHCL) 
This procedure consists of two job steps: assembly and linkage editing. The 
name ASMHCL must be used to call this procedure. Execution of this proce- 
dure results in the production of an assembler listing, a linkage editor listing, 
and a load module. 


The following example illustrates input to the assembler via the input job 
stream. SYSLIN contains the output from the assembly step and the input to 
the linkage edit step. It can be concatenated with additional input to the linkage 
editor as shown in the example. This additional input can be linkage editor 
control statements or other object modules. 


An example of the statements entered in the input stream to use this procedure 


iS: 
//{jobname JOB 
//stepname EXEC PROC=ASMHCL 


//C.SYSIN DD * 


source program statements 


/* 
//L.SYSIN DD * 


object module or linkage editor control statements 

/* 
Note: //L.SYSIN is necessary only if the linkage editor is to combine modules 
or read linkage editor control information from the job stream. 
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Figure 11 shows the statements that make up the ASMHCL procedure. Only 
those statements not previously discussed are explained. 


/IC EXEC  PGM=IEV9Q, PARM=O8JECT, REGION=200K 

//SYSLIB OD DSN=SY$1.HACLIB, OISP=SHR 

//S¥SUT1 00 UNIT=(SYSDA, SEP=SYSLIB) , SPACE= (CYL, (10,5)) , OSN=&SYSUTI 
//S¥SPUNCH 0D SYS QUT=B, DCB= (BLKSIZE=800) , SPACE=(CYL, (5,5,0)) 
//SYSPRINT 00 SYSOUT=A, DCB= (BLKS IZE=3509) , UNI T=(, SEP=(SYSUTL, SYSPUNCH) ) 


//SYSLIN OD DISP=(, PASS) ,UNIT=SYSDA, SPACE=(CYL, (5,5,0)), (1) 
// OCB= (BLKSIZE=400) , OSN=&&LOADSET 

ft EXEC PGM=IEWL, PARM= ‘MAP, LET, LIST, NCAL’ , REGION=96K, COND= (8, LT, C) (2) 
//SYSLIN OD DSN=&&LOADSET , DISP=(OLD, DELETE) (3) 
fi oD DONANE=SYSIN (4) 
//SYSLMOD OD DISP=(, PASS) , UNIT=SYSDA, SPACE=(CYL, (2, 1, 2)) , DSN=&GOSET (GO) (5) 
//SYSUTL OD UNIT=SYSDA, SPACE=(CYL, (3, 2)), DSN=&SYSUTI (6) 
//SYSPRINT OD SYSOUT=A, DCB= (RECFM=FB, BLKS IZE=3509) (7) 


Figure 11. Cataloged Procedure for Assembling and Link-Editing (ASMHCL) 


Notes to Figure 11: 


a, 


In this procedure, the SYSLIN DD statement describes a temporary data set, 
the object module, which is passed to the linkage editor. 


. This statement initiates linkage editor execution. The linkage editor options 


in the PARM field cause the linkage editor to produce a cross-reference 
table, a module map, and a list of all control statements processed by the 
linkage editor. The NCAL option suppresses the automatic library call func- 
tion of the linkage editor. 


. This statement identifies the linkage editor input data set as the same one 


(SYSLIN) produced as output from the assembler. 


. This statement is used: to concatenate any input to the linkage editor from 


the input stream (object decks and/or linkage editor control statements) 
with the input from the assembler. 


. This statement specifies the linkage editor output data set (the load 


module). As specified, the data set will be deleted at the end of the job. If 
it is desired to retain the load module, the DSN parameter must be respeci- 
fied and a DISP parameter added. See “Overriding Statements in Cata- 
loged Procedures.” If the output of the linkage editor is to be retained, the 
DSN parameter must specify a library name and a member name at which 
the load module is to be placed. The DISP parameter must specify either 
KEEP or CATLG. 


. This statement specifies the utility data set for the linkage editor. 


. This statement identifies the standard output class as the destination for the 


linkage editor listing. 
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Cataloged Procedure for Assembly, Link-Editing, and Execution (ASMHCLG) 


This procedure consists of three job steps: assembly, link-editing, and exe- 
cution. 


The name ASMHCLG must be used to call this procedure. An assembler 
listing, an object deck, and a linkage editor listing are produced. 


The statements entered in the input stream to use this procedure are: 


//jobname JOB 
//stepname EXEC PROC=ASMHCLG 


//€.SYSIN DD * 
source program statements 


yi 
F/\.<SYSIN DD * 


object module or linkage editor control] statements 


is 
//G.ddname DD =. (parameters) 
//G.ddname DD (parameters) 
//G.ddname DD Ok 
problem program input 
[* 
Notes: 


1. //L.SYSIN is necessary only if linkage editor is to combine modules or read 
linkage editor control information from the job stream. 


2. //G.ddname statements are included only if necessary. 
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Figure 12 shows the statements that make up the ASMHCLG procedure. Only 
those statements not previously discussed are explained in the figure. 


//C EXEC  PGM=1EV90, PARM=OBJECT , REGION=200K 

//SYSLIB DD DSN=SYS1.MACLIB, DISP=SHR 

//SYSUTL OD UNIT=(SYSDA, SEP=SYSLIB) , SPACE=(CYL, (10,5)),OSN=&SYSUT1 

//SYSPUNCH 0D SYSOUT=B, DCB=(BLKSIZE=800) , SPACE=(CYL, (5, 5,0) ) 

//SYSPRINT OD SYSOUT=A, DCB=(BLKSIZE=3509) , UNIT=(, SEP=(SYSUT1, SYSPUNCH) ) 

//SYSLIN OD DISP=(, PASS) ,UNIT=SYSDA, SPACE= (CYL, (5,5,0)), 

// DCB= (BLKSIZE=400) , DSN=&&LOADSET 

//t EXEC PGM=IEWL, PARH='MAP, LET, LIST, NCAL ' , REGION=96K, COND= (8, LT, C) 
(1) 

//SYSLIN DD DSN=&&LOADSET, DISP=(OLD, DELETE) 

// DD DDNAME=SYS IN 

//SYSLMOD OD DISP=(, PASS) , UNIT=SYSDA, SPACE=(CYL, (2, 1,2)) , DSN=&GOSET (GO) 
(2) 


//S¥SUT1 DD UNI T=SYSDA, SPACE=(CYL, (3,2) ) ,DSN=&SYSUT1 
//SYSPRINT OD SYSOUT=A, DCB= (RECFM=FB, BLKSIZE=3509) 
/1/G EXEC PGH=*,L.SYSLMDD, COND=((8,LT,C), (4,LT,L)) (3) 


Figure 12. Cataloged Procedure for Assembly, Link-Editing, and Execution (ASMHCLG) 


Notes to Figure 12: 


1. The LET linkage editor option specified in this statement causes the linkage 
editor to mark the load module as executable even though errors were 
encountered during processing. 


2. The output of the linkage editor is specified as a member of a temporary 
data set, residing on a direct-access device, and is to be passed to a fol- 
lowing job step. 


3. This statement initiates execution of the assembled and link-edited 
program. The notation *.L.SYSLMOD identifies the program to be executed 
as being in the data set described in job step L by the DD statement named 
SYSLMOD. 


Cataloged Procedure for Assembly and Loader Execution (ASMHCG) 
This procedure consists of two job steps: assembly and loader execution. 
Loader execution is a combination of linkage editing and loading the program 
for execution. Load modules for program libraries are not produced. (See also 
“Simple Assembly and Execution” on page 27 for more details and another 
example.) 
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The statements entered in the input stream to use this procedure are: 


//jobname JOB 
//stepname EXEC PROC=ASMHCG 


//C.SYSIN DD * 


source program 


/* 
//G.ddname DD (parameters) 
//G.ddname DD (parameters) 
//G.ddname DD 6¢* 

problem program input 
/* 


Note: //G.ddname statements are included only if necessary. 


Figure 13 shows the statements that make up the ASMHCG procedure. Only 
those statements not previously discussed are explained in the figure. 


The name ASMHCG must be used to call this procedure. Assembler and 
loader listings are produced. 


//C EXEC PGH=IEV90, PARH=OBJECT, REGION=200K 

//SYSLIB DD DSN=SYS1.MACLIB, DISP=SHR 

//SYSUTI DD UNIT=(SYSDA, SEP=SYSLIB) , SPACE=(CYL, (10,5) ),DSN=&SYSUT1 
//SYSPUNCH DD SYSOUT=B, DCB= (BLKSIZE=800) , SPACE= (CYL, (5,5, 0) ) 
//SYSPRINT DD SYSOUT=A, DCB=(BLKSIZE=3509) , UNIT=(,SEP=(SYSUT1, SYSPUNCH) ) 
//SYSLIN DD DISP=(, PASS) , UNIT=SYSDA, SPACE=(CYL, (5,5,0)), 

// DCB= (BLKSIZE=400) , DSN=&&LOADSET 

//G EXEC PGM=LOADER, PARM='HAP, LET, PRINT, NOCALL' (1) 
//SYSLIN DD DSN=8&LOADSET, DISP=(OLD, DELETE) (2) 

// DD DDNANE=SYSIN 
//SYSLOUT DD SYSOUT=A (3) 


Figure 13. Cataloged Procedure for Assembly and Loader Execution (ASMHCG) 


Notes to Figure 13: 


1. This statement initiates loader execution. The loader options in the 
PARM = field cause the loader to produce a map and print the map and 
diagnostics. The NOCALL option is the same as NCAL for the linkage 
editor, and the LET option is the same as for the linkage editor. 


2. This statement defines the loader input data set as the same one produced 
as output by the assembler. 


3. This statement identifies the standard output class as the destination for the 


loader listing. 
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Overriding Statements in Cataloged Procedures 


EXEC Statements 


Any parameter in a cataloged procedure can be overridden except the PGM= 
parameter in the EXEC statement. Such overriding of statements or fields is 
effective only for the duration of the job step in which the statements appear. 
The statements, as stored in the procedure library of the system, remain 
unchanged. 


Overriding for the purposes of respecification, addition, or nullification is 
accomplished by including in the input stream statements containing the 
desired changes and identifying the statements to be overridden. 


Any EXEC parameter (except PGM) can be overridden. For example, the 
PARM= and COND= parameters can be added or, if present, respecified, by 
including them in the EXEC statement calling the procedure, the notation 
PARM.stepname=, or COND.stepname =, followed by the desired parameters. 
“Stepname” identifies the EXEC statement within the procedure to which the 
modification applies. 


If the procedure consists of more than one job step, a PARM.procstepname = 
or COND.procstepname= parameter may be entered for each step. The 
entries must be in order (PARM.procstepname1=, PARM.procstepname2 =, 
etc.). 


| REGION Parameter of EXEC or JOB Statement 


DD Statements 


If OK, OM, or a value greater than 16M is specified, the results will be unpredict- 
able. 


All parameters in the operand field of DD statements may be overridden by 
including in the input stream (following the EXEC card calling the procedure) a 
DD statement with the notation //procstepname.ddname in the name field. 
“Procstepname” refers to the job step in which the statement identified by 
“ddname’ appears. 


Note: If more than one DD statement in a procedure is to be overridden, the 
overriding statements must be in the same order as the statements in the pro- 
cedure. 
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Examples of Cataloged Procedures 
1. In the assembly procedure ASMHC (Figure 10 on page 38), the production 
of a punched object deck could be suppressed and the UNIT = and 
SPACE= parameters of data set SYSUT1 respecified, by including the fol- 
lowing statements in the input stream: 


//stepname EXEC  PROC=ASMHC, X 
if PARM=NODECK 

//SYSUTI s}9) UNIT=3330, X 
// SPACE=(200, (300, 49)) X 


//SYSIN DD is 
source statements 


]/* 
2. In procedure ASMHCLG (Figure 12 on page 42), suppressing production of 
an assembler listing and adding the COND= parameter to the EXEC state- 


ment, which specifies execution of the linkage editor, may be desired. In 
this case, the EXEC statement in the input stream would appear as follows: 


//stepname EXEC  PROC=ASMHCLG, X 
// PARM.C=(NOLIST,OBJECT), X 
// COND.L=(8,LT,stepname .C) 


For this execution of procedure ASMHCLG, no assembler listing would be 
produced, and execution of the linkage editor job step //L would be sup- 
pressed if the return code issued by the assembler (step C) were greater 
than 8. 


Note: When you override the PARM field in a procedure, the entire PARM 
field is overridden. Thus, in this example, overriding the LIST parameter 
effectively deletes PARM=OBJECT. PARM=OBJECT must be repeated in 
the override statement; otherwise, the assembler default value NOOBJECT 
will be used. 


3. The following list shows how to use the procedure ASMHCL (Figure 11 on 
page 40) to: 


a. Read input from a nonlabeled 9-track tape in unit 282 that has a 
standard blocking factor of 10. 


b. Put the output listing on a tape labeled TAPE10, with a data set name of 
PROG1 and a blocking factor of 5. 


c. Block the SYSLIN output of the assembler and use it as input to the 
linkage editor with a blocking factor of 5. 


d. Link-edit the module only if there are no errors in the assembler 
(COND = 0). 
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e. Link-edit onto a previously allocated and cataloged data set 
USER.LIBRARY with a member name of PROG. 


//jobname JOB 
//stepname EXEC PROC=ASMHCL, x ww 
py COND.L=(0,NE,stepname .C) 

//C.SYSPRINT OD DSNAME=PROG1,UNIT=TAPE, x 

// VOLUME=SER=TAPE 10, DCB=(BLKSIZE=605) 

//C.SYSLIN DD —-DCB=(BLKSIZE=800) 

//C.SYSIN DD —sUUNIT=282,LABEL=(,NL), x 

// DCB=(RECFM=FBS , BLKSIZE=800) 

//L.SYSIN DD DCB=stepname.C.SYSLIN 

//L.SYLMOD DD —«sOOSNAME=USER. LIBRARY (PROG) ,DISP=OLD 

‘ag 


Note: The order of appearance of overriding ddnames for job step C corre- 
sponds to the order of ddnames in the procedure; that is, SYSPRINT pre- 
cedes SYSLIN within step C. The ddname C.SYSIN was placed last because 
OYSIN does not occur at all within step C. These points are covered in the 
appropriate JCL Reference. 


4. The following example shows assembly of two programs, link-editing of the 
two assemblies into one load module, and execution of the load module. 
The input stream appears as follows: 


//stepnamel EXEC  PROC=ASMHC , PARM=OBJECT 
//SYSLIN DD DSNAME=&LOADSET , UNIT=SYSSQ, X 
// SPACE=(80, (100,50)), x 
// DISP=(MOD, PASS) , DCB=(BLKSIZE=800) 
//SYSIN DD * 





source program 1 statements 


/* 
//stepname2 EXEC PROC=ASMHCLG 
//C.SYSLIN DD DCB=(BLKSIZE=800) ,DISP=(MOD,PASS) 
//C.SYSIN DD . 
source program 2 statements 

i. 
//L-SYSIN DD * 

ENTRY PROG 
y* 
//G.ddname DD dd cards for G step 


The appropriate JCL Reference provides additional descriptions of overriding 
techniques. 
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Chapter 5. Programming Considerations 


This chapter discusses some topics in assembler language programming. 


Saving and Restoring General Register Contents 


A problem program should save the values contained in the general registers 
upon commencing execution and, upon completion, restore to the general reg- 
isters these same values. Thus, as control is passed from the operating system 
to a problem program and, in turn, to a subprogram, the status of the registers 
used by each program is preserved. This is done through use of the SAVE and 
RETURN system macro instructions. 


The SAVE macro instruction should be the first statement in the program. It 
stores the contents of registers 14, 15, and 0 through 12 in an area provided by 
the program that passes control. When a problem program is given control, 
register 13 contains the address of an area in which the general contents 
should be saved. 


If the program calls any subprograms, or uses any operating system services 
other than GETMAIN, FREEMAIN, ATTACH, and XCTL, it must first save the con- 
tents of register 13 and then load the address of an 18-fullword save area into 
register 13. This save area is in the problem program and is used by any sub- 
programs or operating system services called by the problem program. 


At completion, the problem program restores the contents of general registers 
14, 15, and O through 12 by use of the RETURN system macro instruction (which 
also indicates program completion). The contents of register 13 must be 
restored before execution of the RETURN macro instruction. 


The coding sequence that follows illustrates the basic process of saving and 
restoring the contents of the registers. A complete discussion of the SAVE and 
RETURN macro instructions and the saving and restoring of registers is con- 
tained in the appropriate Supervisor Services and Macro Instructions manual. 


Name Operation Operand 
BEGIN SAVE (14,12) 
USING BEGIN,15 
ST 13, SAVEBLK+4 
LA 13, SAVEBLK 
L 13, SAVEBLK+4 
RETURN (14,12) 
SAVEBLK OC 18F'O' 
END 
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Program Termination 


You indicate completion of an assembler language source program by using 
the RETURN system macro instruction to pass control from the terminating 
program to the program that initiated it. The initiating program may be the 
Operating system or, if a subprogram issued the RETURN, the program that 
called the subprogram. 





In addition to indicating program completion and restoring register contents, the 
RETURN macro instruction may also pass a return code—a condition indicator 
that may be used by the program receiving control. 


If the return is to the operating system, the return code is compared against the 
condition stated in the COND= parameter of the JOB or EXEC statement. 


If return is to another problem program, the return code is available in general 
register 15, and may be used as desired. Your program should restore register 
13 before issuing the RETURN macro instruction. 


The RETURN system macro instruction is discussed in detail in the appropriate 
Supervisor Services and Macro Instructions manual. 


PARM Field Access 


Access to information in the PARM field of an EXEC statement is gained 
through general register 1. When control is given to the problem program, 
general register 1 contains the address of a fullword which, in turn, contains the 
address of the data area containing the information. 





The data area consists of a halfword containing the count (in binary) of the 
number of information characters, followed by the information field. The infor- 
mation field is aligned to a fullword boundary. The following diagram illustrates 
this process: 


General Register 1 


Address of Fullword 


Points 
1 Fullword 
Address of Data Area Sintec 
to 
Data Area 


Information Field 
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Macro Definition Library Additions 


Source statement coding, to be retrieved by the COPY assembler instruction, 
and macro definitions may be added to the macro library. The IEBUPDTE utility 
program is used for this purpose. Details of this program and its control state- 
ments are contained in the appropriate Utilities publication. The following 
example shows how a new macro definition, NEWMAC, is added to the system 
library, SYS1.MACLIB. 


//CATMAC JOB 12345,BROWN.JR,... 

JJ SVEPA EXEC PGM=ITEBUPDTE , PARM=MOD 

//SYSUT1 — DD DSNAME=SYS1.MACLIB,DISP=OLD 

//SYSUT2 DD DSNAME=SYS1.MACLIB,DISP=O0LD 

//SYSPRINT DD SYSOUT=A 

//SYSIN DD DATA 

af ADD LIST=ALL, NAME=NEWMAC , LEVEL=01,SOURCE=0 
MACRO 


NEWMAC &0P1,&0P2 
LCLA &PAR1,&PAR2 


MEND 
if ENDUP 
/* 


The SYSUT1 and SYSUT2 DD statements indicate that SYS1.MACLIB, an 
existing program library, is to be updated. Output from the IEBUPDTE program 
is printed on the Class A output device (specified by SYSPRINT). The utility 
control statement, ./ ADD, and the macro definition follow the SYSIN statement. 
The ./ ADD statement specifies that the statements following it are to be added 
to the macro library under the name NEWMAC. When you include macro defi- 
nitions in the library, the name specified in the NAME parameter of the ./ ADD 
statement must be the same as the operation code of the macro definition. 


Load Module Modification—Entry Point Restatement 


If the editing functions of the linkage editor are to be used to modify a load 
module, the entry point to the load module must be restated when the load 
module is reprocessed by the linkage editor. Otherwise, the first byte of the 
first control section processed by the linkage editor will become the entry point. 
To enable restatement of the original entry point, or designation of a new entry 
point, the entry point must have been identified originally as an external 
symbol; that is, it must have appeared as an entry in the external symbol dic- 
tionary. External symbol identification is done automatically by the assembler if 
the entry point is the name of a control section or START statement; otherwise, 
an assembler ENTRY statement must be used to identify the entry point as an 
external symbol. 


When a new object module is added to or replaces part of the load module, the 
entry point is restated in one of three ways: 


e By placing the entry point symbol in the operand field of an EXTRN state- 
ment and an END statement in the new object module 


« By using an END statement in the new object module to designate a new 
entry point in the new object module 
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« By using a linkage editor ENTRY statement to designate either the original 
entry point or a new entry point for the load module 





Further discussion of load module entry points is contained in the appropriate 
Linkage Editor and Loader manual. 


Object Module Linkage 


Object modules, whether generated by the assembler or by another language 
processor, may be combined by the linkage editor to produce a composite Joad 
module, provided each object module conforms to the data formats and linkage 
conventions required. This makes it possible for you to use different program- 
ming languages for different parts of your program, allowing each part to be 
written in the language best suited for it. This topic discusses the use of the 
CALL system macro instruction to link an assembler language main program to 
Subprograms produced by another processor. The appropriate Supervisor Ser- 
vices and Macro instructions manual contains additional details concerning 
linkage conventions and the CALL system macro instruction. 


Figure 14 0n page 51 is an example of statements used to establish the assem- 
bler language program linkage to FORTRAN and COBOL subprograms. 


If any input/output operations are performed by called subprograms, appro- 
priate DD statements for the data sets used by the subprograms must be sup- 
plied. See the appropriate language programmer’s guide for an explanation of 
the DD statements and special data set record formats used for the processor. 
see Appendix C, “Object Deck Output” for the format of the object deck. 





Linking with IBM-Supplied Processing Programs 


You usually use the EXEC job control statement to load and give control toa 
processing program of the operating system. However, you can also load and 
give control to a sort program, a utility program, or even a compiler “dynam- 
ically,” that is, by using a system macro instruction (LINK, XCTL, CALL, or 
ATTACH) in your own program. 


Note: If you use the ATTACH macro instruction, the MVS/XA object program 
will not run on S/370. See MVS/Extended Architecture Conversion Notebook for 
more details. 


When calling a program dynamically, make sure you follow the OS/VS linking 
conventions described in the appropriate Supervisor Services and Macro 
Instructions manual. You must alSo pass certain parameters to the processing 
program. These parameters give the same information to the program as you 
would supply in job control statements if you called the program with an EXEC 
statement. The following section describes how to cajl the assembler dynam- 
ically. Dynamic invocation of each of the other IBM-supplied processing pro- 
grams Is covered in one of the manuals describing that program. 
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ENTRPT SAVE (14,12) 


LR 12,15 

USING ENTRPT, 12 

ST 13,SVAREA+4 (1) 

LA 15,SVAREA 

ST 15,8(13) 

LR 13,15 

CALL name, (V1,V2,V3),VL (2) 

L 13, SVAREA+4 

RETURN (14, 12) 
SVAREA DC 18F°O' (3) 
V1 DC (data) (4) 
V2 DC (data) (4) 
V3 DC (data) (4) 

END 


Figure 14. Sample Assembler Linkage Statements for FORTRAN or COBOL Subpro- 
grams 


Notes to Figure 14: 


1. This is an example of OS/VS linkage convention. For details, see your 
system Supervisor Services and Macro Instructions manual. 


2. The symbol used for “name” in this statement is: 


° The name of a Subroutine or function, when the linkage is to a 
FORTRAN-written subprogram. 


e The name defined by the following COBOL statements in the procedure 
division: ENTER LINKAGE. ENTRY 'name’ 


e The name of a CSECT or START statement, or a name used in the 
operand field of an ENTRY statement in an assembler-language subpro- 
gram. 


The order in which the parameter list is written must reflect the order in 
which the called subprogram expects the argument. If the called routine is 
a FORTRAN-written function, the returned argument is not in the parameter 
list: a real or double precision function returns the value in floating point 
register zero; an integer function returns the value in genera/ purpose reg- 
ister zero. 


When linking to FORTRAN-written subprograms, consideration must be 
given to the storage requirements of IBCOM (FORTRAN execution-time I/O 
and interrupt handling routines) which accompanies the compiled FORTRAN 
Subprogram. In some instances, the call for IBCOM is not automatically 
generated during the FORTRAN compilation. VS FORTRAN Application Pro- 
gramming: Library Reference provides information about IBCOM require- 
ments and assembler statements used to call IBCOM. 


FORTRAN-written subprograms and FORTRAN library subprograms allow 
variable-length parameter lists in linkages which call them; therefore, all 
linkages to FORTRAN subprograms are required to have the high-order bit 
in the last parameter in the linkage set to 1. COBOL-written subprograms 
have fixed-length calling linkages; therefore, for COBOL the high-order bit in 
the last parameter need not be set to 1. 
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3. This statement reserves the save area needed by the called subprogram. 
When control is passed to the subprogram, register 13 contains the address 
of this area. 


4. When linking to a FORTRAN or COBOL subprogram, the data formats 
declared in these statements are determined by the data formats required 
by the FORTRAN or COBOL subprograms. 


Invoking the Assembler Dynamically 


Assembler H can be invoked by a problem program at execution time through 
use of the CALL, LINKAGE, XCTL, or ATTACH macro instruction. If the XCTL 
macro instruction is used to invoke the assembler, no user options may be 
Stated. The assembler will use the standard default, as set during system gen- 
eration, for each option. 


If the assembler is invoked by CALL, LINKAGE, or ATTACH, you may supply: 


e The assembler options 
e The ddnames of the data sets to be used during processing 


Name Operation Operand 


symbo | CALL IEV9O, (optionlist[,ddnamelist]),VL 
LINK|ATTACH  EP=IEV9Q,PARAM=(optionlist[,ddnamelist]) ,VL=] 


EP 
specifies the symbolic name of the assembler. The entry point at which 
execution is to begin is determined by the control program (from the Jibrary 
directory entry). 


PARAM 
specifies, as a sublist, address parameters to be passed from the problem 
program to the assembler. The first word in the address parameter list 
contains the address of the option list. The second word contains the 
address of the ddname list. 


optioniist 
specifies the address of a variable-length list containing the options. This 
address must be written even if no option list is provided. 


The option list must begin on a halfword boundary, that is, not also a 
fullword boundary. The first two bytes contain a count of the number of 
bytes in the remainder of the list. If no options are specified, the count 
must be zero. The option list is free form, with each field separated from 
the next by a comma. No blanks or zeros appear in the list. 


ddnamelist 
specifies the address of a variable-length list containing alternative 
ddnames for the data sets used during compiler processing. If standard 
ddnames are used, this operand may be omitted. 
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C 


VL 


The ddname list must begin on a halfword boundary. The first two bytes 
contain a count of the number of bytes in the remainder of the list. Each 
name of less than 8 bytes must be left-justified and padded with blanks. lf 
an alternative ddname is omitted, the standard name will be assumed. If 
the name is omitted within the list, the 8-byte entry must contain binary 
zeros. Names can be omitted from the end merely by shortening the list. 
The sequence of the 8-byte entries in the ddname list is as follows: 


Entry Alternative 

1 SYSLIN 

Not applicable 
Not applicable 
SYSLIB 

SYSIN 
SYSPRINT 
SYSPUNCH 
SYSUT‘ 

9 Not applicable 
10 Not applicable 
11 Not applicable 
12 SYSTERM 


CON MO HR WS PP 


Note: An overriding ddname specified when Assembler H was added to the 
operating system occupies the same place in the above list as the 
IBM-supplied ddname it overrides. The overriding ddname can itself be 
overridden during invocation. For example, if SYSWORK1 replaced 
SYSUT1, it occupies position 8 in the above list. SYSWORK‘1 can be over- 
ridden by another name during invocation. 


specifies that the sign bit is to be set to 1 in the last word of the address 
parameter list. 


The appropriate JCL Reference provides additional description of overriding 
techniques. 
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Chapter 6. Calculating Storage Requirements 


Main Storage 


When Assembler H is run in a 200K-byte region, about half the region is 
devoted to fixed storage for load modules, data management, and Operating 
system workspace. The other half is allotted to variable storage for buffers, 
tables, and intermediate results. If the region size is varied, the size of the var- 
liable storage will be affected. There are ways to decrease the size of fixed 
storage, whether the region size is increased or kept at 200K bytes. 


Fixed Storage 
Fixed storage accounts for approximately 95K bytes, of which about 86K bytes 
are needed for load modules. Figure 15 on page 56 shows the assembler’s 
use of a 200K-byte region. Neither time nor main storage is drawn to scale. 
The shaded portion represents main storage that is free at any point in time. 


Figure 15 represents a series of assemblies in BATCH mode. The first few 
events follow. For further details, see “Program Organization” in Assembler H 
Version 2: Logic. 


1. Module IEV9O is loaded first. 


2. Module IEV90 loads modules IEVOO and IEV10, then transfers control to 
module IEVOO. 


3. Module IEVOO loads module IEV60, opens the necessary data sets (bringing 
in Data Management modules), gets all remaining free space in the region 
by a GETMAIN, releases 8K bytes for OS transient use, and returns to 
module |EVSO. 


4. Module JEV90 deletes module IEVOO, loads module IEV50, and transfers 
control to module IEV10. 


5. Module IEV90 deletes module IEV10, loads module IEV20, and transfers 
control to module IEV20. 


6. Module IEV90 deletes module IEV20, loads module JEV10, etc. 
An installation can reduce the region size or increase the amount of variable 
storage by putting one or more modules into the link pack area. Note that 


approximately 6K bytes can be saved if the required BSAM data management 
modules are in link pack. 
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Figure 15. Basic Layout for Assembler H 
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rt 


Figure 16 shows the amount of space required in link pack by the indicated 
modules, and the reduced minimum region required for the assembler. 


Modules Space in Assembler H Region 
Link Pack (in Bytes) 

None 0 200K 
lIEV90 6K 194K 
IEV10 133K 135K 
IEV20 

IEV80 

IEV10 139K 129K 
IEV20 

IEV80 

lIEV90 


Figure 16. Required Space in Link Pack 


Module IEV80 was not shown in Figure 15 on page 56. It is called by IEV90 only 
if an 1/O error from which the system cannot recover occurs, or if Assembler H 
encounters an impossible situation. Module IEV80 produces a formatted dump 
of the region. 


If Assembler H is in link pack, a maximum of only a few seconds is saved for 
each assembly. However, if a high volume of assemblies justifies keeping two 
regions active, the saving in region size shown in Figure 16 becomes more 
meaningful. 


Variable Storage 


Buffers 


The amount of main storage that module IEVOO sets aside for buffers can be 
considerable. Consider the following example: 


OPTIONS=BATCH, DECK, OBJECT 
BLKSIZE=3200 (for SYSIN) 
3360 (for SYSLIB) 
3146 (for SYSPRINT) 
400 (for SYSPUNCH and SYSLIN) 
2 buffers for each data set 


Then, 
BUFFERS = 2(3200+3360+3146+400+400) bytes 
= 21,012 bytes 
lf all factors are as above except PARM =NOBATCH, then 
BUFFERS 


MAX[ (SYSIN+SYSLIB) , (SYSPRINT+SYSPUNCH+SYSLIN) ] 
MAX[2(3200+3360) ,2(3146+400+400) | 

MAX[ (13,120), (7,892) ] 

= 13,120 bytes 


Either way, the assembler is tying up a lot of variable storage for buffers. 
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Suppose 200K bytes is the size of the largest region available in a particular 
installation and there is no possibility of putting Assembler H modules into link 
pack. If a particularly large source deck will not assemble under Assembler H 
because of a lack of variable storage, then you can attempt the following proce- 
dures, in the indicated sequence, singly or in combination: 





1. If both the options TERM and LIST have been specified, see whether one of 
them can be eliminated. 


2. Decrease BLKSIZE, particularly on SYSIN and SYSPRINT. The distributed 
cataloged procedures (for details, see “Cataloged Procedures” on page 37) 
include the following DD statement: 


//SYSPRINT DD SYSOUT=A,DCB=(BLKSIZE=3509) 


Override these as follows: 


//{/SYSPRINT DD SYSOUT=A,0CB=(BLKSIZE=1210) 
/{SYSIN DD *,DCB=({BLKSIZE=800) 


Note that BLKSIZE must be a multiple of 121 for SYSPRINT and SYSTERM, 
and a multiple of 80 for SYSIN, SYSLIB, SYSPUNCH, and SYSLIN. 


3. Copy SYSLIB to a private library, reblocking it to a smaller size. The new 
BLKSIZE must be a multiple of 80. Override the SYSLIB DD statement to 
indicate the new blocking factor and the new DSNAME. 


4. Consider the default setting of SYSUT1 described below. Specify, by over- 
riding the default, a smaller BLKSIZE on the SYSUT1 DD card. See “Work 
File Blocks,” below, for details. 


5. If none of these procedures solves the problem, you are faced with the 
prospect of breaking the single, large program down into two or more 
smaller ones. 





Assembler H keeps the ordinary symbol table and global dictionary in main 
Storage throughout Pass 1 {IEV10). This leads to the type of problem covered 
by the above five steps. Before breaking the program into smaller ones, you 
might attempt to decrease the number of symbols that are in your program or 
are generated by your program. 


For example, if you use the DCBD macro to define all possible symbolic fields 
of a DCB and actually use only one such field, you have unknowingly put about 
100 unused symbols into the symbol table. These 100 symbols occupy about 
3400 bytes. 


Work File Blocks 
After setting aside sufficient variable storage for data set buffers, IEVOO divides 
the remaining variable storage into work file blocks. 


several factors are considered in determining the block size. They include the 
following: 


1. Many of these blocks will be spilled onto SYSUT1. For efficient utilization of 
SYSUT1 space, the block sizes should be chosen from full-track, half-track, 
third-track, etc., sizes corresponding to the device assigned to SYSUT1. 


2. The block size should be reasonable. 


3. For ease of internal processing, the block size should be a multiple of 8. - 
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Symbol Tables 


The default size selected (that is, the largest block size satisfying 1, 2, and 3 
above) for a 3330/3333 direct-access device is 4248 bytes. 


The various routines in Assembler H are given one block of work space at a 
time, as needed. Once obtained, the blocks are not reusable until the 
requesting routine indicates that they can be returned or spilled onto SYSUT1. 
Depending on the assembly and the device used for SYSUT1, this may result in 
inefficient use of main storage. 


For example, Pass 2 needs a block for RLDs. If SYSUT1 is a 3330 and there is 
only one RLD involved, then Pass 2 ties up 4248 bytes of main storage for 8 
bytes of useful information. Because there is room for fewer than 20 of these 
blocks in the normal 200K-byte region, it is conceivable that the assembler 
could run out of main storage in some situations. 


As pointed out in the previous section, one method of attempting to remedy this 
situation would be to override the block size (BLKSIZE) for SYSUT1 on the DD 
statement. Thus, in the case of the 3330 (refer to “Cataloged Procedures” on 
page 37), you could use the following: 


//{SYSUT1 DD UNIT=SYSDA,DCB=(BLKSIZE=2056) , SPACE=(CYL,(10,5)) 


Strictly speaking, you do not need to restrict yourself to the natural divisors 
(full, half, third, quarter) of device tracks. However, you should be aware of the 
consequences of a poor choice. For example, 4248 bytes is nearly a third of a 
track for the 3330; 4144 bytes bytes is also nearly a third of a track, but 4352 
bytes is too big—only two 4352-byte blocks would fit on each track. In addition, 
making the block size too small may cause unusually heavy I/O activity on 
SYSUT1 and hinder performance. Assembler H will set the SYSUT1 block size 
to the default value if you attempt to set it to less than 2008 bytes. 


You can specify a BLKSIZE larger than the size of a track for the device if you 
also specify the parameter RECFM=T (for track overflow); naturally, the device 
used for SYSUT1 must have the track overflow feature. If the BLKSIZE specified 
is larger than a track but track overflow is not specified in RECFM, the assem- 
bler takes the default block size for the device. 


A program containing approximately 1000 symbols, each symbol occupying 
about 34 bytes of main storage work space, can be assembled in the Assembler 
H 200K-byte region. 


Figure 17 on page 60 can be used as a guide in assessing the amount of main 
storage needed to assemble a program with a given number of symbols. 


Overall Dynamic Storage 


Assembler H uses BPAM to access library data and BSAM for general data 
management. The assembler can run on any OS/VS system that has a virtual 
storage area of 200K bytes assigned to it. 
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Number of 


Symbols 
2000 
1000 x 
. Main storage in bytes 
170K 200K 230K 


Figure 17. Aid in Assessing Main Storage Required by a Symbol Table with 1000 or 
2000 Symbols 


Auxiliary Storage Estimates 


Work File Space for SYSUT1 


During both Pass 1 and Pass 2, the single work file SYSUT1 is used for interme- 
diate results. Distributed cataloged procedures (see “Cataloged Procedures” 
on page 37) for SYSUT1 show a primary allocation of 10 cylinders and up to 15 
additional secondary allocations in increments of 5 cylinders each. This should 
be sufficient for most assemblies. 


The amount of SYSUT1 space used is almost independent of region size. As 
pointed out earlier, a poor choice of BLKSIZE for SYSUT1 could drastically 
increase the direct access space needed. Whenever IEV10 fills a block that can 
be spilled to SYSUT1, the block is written out to SYSUT1 in anticipation of a 
need to reuse the main storage space. If this need never arises and the main 
storage space is never overlaid, the data is simply not read back from SYSUT1. 
However, such data is taking up space on SYSUTT1. 


Auxiliary Space on LINKLIB and PROCLIB 


60 


The following list shows the number of tracks needed for the Assembler H load 
modules on SYS$1.LINKLIB (or a private library) when the system uses the 
OS/VS Linkage Editor or Loader. The PROCLIB uses approximately 1 track 
regardless of device type. 


Number of Directory Blocks: 2 


Number of Tracks Required for LINKLIB: 


3330 DASD - 19 3375 DASD - 8 
3340 DASD - 29 3380 DASD - 6 
3350 DASD - 13 
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Part 3. CMS Information 


e “Chapter 7. Assembler Language Programming under CMS” describes 
how to assemble and execute your program, how to choose and specify the 
Options you need, and how to interpret the listing and diagnostic messages 
issued by the assembler. 


e “Chapter 8. Programming Considerations” discusses various topics, such 
as standard entry and exit procedures for problem programs. 
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Chapter 7. Assembler Language Programming under CMS 


This chapter is for programmers who code in the assembler language under 
CMS (Conversational Monitor System). It is intended to help you assemble and 
execute your program, to choose and specify the options you need, and to 
interpret the listing and the diagnostic messages issued by the assembler. To 
use this section effectively, you should be familiar with the assembler language 
described in Assembler H Version 2 Language Reference. 


This chapter is composed of the following major sections: 


e “Introduction” describes the relationship of the assembler to CMS, and the 
input for and output of the assembler. 


e “CMS Management of Your Assembly” describes how CMS manages the 
processing of permanent and temporary files created during assembly. 


e “Creating an Assembler Language Program: CMS Editor” describes how 
you create an assembler language program using the CMS editor. This 
section also describes how to define an OS/VS data set as a CMS file. 


e “Using Macros” refers you to another manual for a description of CMS 
Assembler macros, and describes how to add macro definitions to a macro 
library and specify the order in which those macro libraries are searched. 


e “Assembling Your Program: HASM Command” describes the format of the 
CMS HASM command. 


e “Assembler Options for CMS” describes how you use the assembler 
options when you assemble your program. 


e “Assembler Data Sets and Storage Requirements” describes the assembler 
data sets and storage requirements of the assembler. 


e “Loading and Executing Your Assembled Program” describes the com- 
mands for execution and for executing more than one module in an 
assembly. This section also describes CMS register usage during program 
execution and how parameters are passed to the program. Finally, this 
section tells you how to create a module of your program, so that it will 
execute when you invoke its file name on the command line. 


e “Programming Aids” supplies information about the SYSTERM listing, and 
about the diagnostic messages generated by CMS. 


Relationship of Assembler to CMS 


The assembler language program can be executed under control of CMS. This 
assembler program is the same as that supplied with the OS/VS systems. For 
more information about CMS, refer to VM/SP CP Command Reference for 
General Users and VM/SP CMS Command and Macro Reference. 
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Input 


As input, the assembler accepts a program written in assembler language (as 
defined in the Glossary). This program is referred to as a source module. 


Output 


The output from the assembler consists of an object module and a program 
listing. The object module is stored on your virtual disk in a TEXT file. You can 
bring it into your virtual storage and execute it by using the CMS LOAD and 
START commands. The program listing lists all the statements in the module, 
both in source and machine language format, and gives other important infor- 
mation about the assembly, such as error messages. The listing is described 
in detail in “Chapter 2. Using the Assembler Listing.” 


CMS Management of Your Assembly 


When you assemble a program under CMS, permanent and temporary files are 
created and CMS performs certain processing steps. This section describes 
how CMS manages this processing. 


Files Created during Assembly 
During the assembly of your program, files are created by CMS. Some files are 
permanent, others temporary. The permanent files are: 


e An ASSEMBLE file, which is the source code used as input by the assem- 
bler 


e The LISTING file, which contains the listing produced by the assembler, 
describing the results of the assembly 


e The TEXT file, which contains the object code created during the assembly 
A temporary file, SYSUT1, is created during assembly. It is used as a work file 


during assembly of your program. Figure 18 on page 65 shows input to the 
assembler and its output. 


The utility files are placed on the read/write disk with the most available write 
space. 


The TEXT and LISTING files are placed on one of three possible disks, if they 
are available: 


e« The disk on which the source file resides 
e The parent disk of the above disk (if it exists) 
e The primary disk 


If all three attempts fail to place the information on a read/write disk, the 
assembly will terminate with an error message. 
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INPUT TO ASSEMBLER ASSEMBLER OUTPUT 


Virtual Disk 
on which your MYFILE 
ASSEMBLE File ASSEMBLE 


resides, the A1 Disk. Al 


MYFILE 
ASSEMBLE Your A1 Disk now 


and LISTING. 


Assembler contains three files 
Program with filename MY FILE — 
ASSEMBLE, TEXT, 


SYSUT1 
Temporary 
workfile; erased 
after assembly 


Figure 18. Files Created during Assembly 


File Processing by the Assembler 


When assembling under CMS, two new files are created, each with the file 
name of the source ASSEMBLE file, but with file types of TEXT and LISTING. 
During assembly, any files residing on the virtual disk being processed, with the 
file name of the file you are processing and file types of TEXT or LISTING, will 
be erased. Unless you specify otherwise, the new TEXT and LISTING files 
created during assembly take their place on your processing disk. These files 
are erased even if you specify via NOOBJECT and NOLIST that there will be no 
new files to replace them. 


CMS also defines a utility file for your assembly, thus eliminating the need for 
you to define it. At the end of assembly, the utility file is erased. 


Creating an Assembler Language Program: CMS Editor 


To create an assembler language program using CMS, you can use the CMS 
EDIT command. The EDIT command invokes the CMS editor, which provides an 
interactive environment for program creation, including subcommands that 
allow you to perform such functions as inserting and deleting lines and auto- 
matic tab setting. When you create an assembler language program under 
CMS, the EDIT command its entered in the following form: 


EDIT filename ASSEMBLE 
where filename is the name of your file. You must ensure that you enter a 
filetype of ASSEMBLE, thus specifying to the editor (and CMS) that you are cre- 


ating an assembler language program. You can find a complete description of 
the editor and its facilities in VM@/SP CMS Command and Macro Reference. 
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When you have created your assembler language program, you use the CMS 
HASM command to invoke the assembler program to assemble your program 
file. 


Overriding HASM File Defaults 


When you issue the HASM command, default FILEDEF commands are issued for 
assembler data sets. You may want to override these with explicit FILEDEF 
commands. The ddnames used are: 


SYSIN Input to the assembler 
SYSLIB Macro/COPY library 
SYSUT‘ Utility work file 
SYSPUNCH Object module output 
SYSLIN Object module output 
SYSPRINT ~— Listing output 
SYSTERM _ Diagnostic output 


The default FILEDEF commands issued by HASM for these ddnames are: 


FILEDEF SYSLIN DISK fn ASSEMBLE * (RECFM FB LRECL 80 BLOCK 3200 
FILEDEF SYSLIB DISK CMSLIB MACLIB * (RECFM FB LRECL 80 BLOCK 3200 
FILEDEF SYSUT1 DISK fn SYSUT1 m4 (BLOCK 4000 

FILEDEF SYSPUNCH PUNCH 

FILEDEF SYSLIN DISK fn TEXT ml 

FILEDEF SYSPRINT DISK fn LISTING ml (RECFM FB BLOCK 121 

FILEDEF SYSTERM TERMINAL 


In the FILEDEFs for SYSUT1, SYSLIN, and SYSPRINT, the file modes ‘m4’ and 
‘m1’ are established dynamically by the HASM command processor as follows: 





In the FILEDEF for SYSUT1, the file mode ‘m4’ is set to use the read/write disk 
with the most available space. For example, if three read/write disks were 
accessed as the A, B, and D disks, and if the D disk had the most available 
space, then ‘m4’ would be set to ’D4’ for use during the assembly. 


In the FILEDEFs for SYSLIN and SYSPRINT, if the assembler source file (SYSIN 
input) is not on disk or is on a read-only disk, the file mode ‘m1’ is set to ‘A1’. 
If the source file is on a read/write disk, the mode letter ‘m’ is set to the mode 
of that read/write disk. For example, if the source file were on a read/write B 
disk, the file mode ’m1° would be set to ’B1’. 


A FILEDEF command, issued to any of the above ddnames prior to invoking the 
assembler, overrides the default FILEDEF issued by the HASM command 
processor. Assume that there is an assembler source file in card deck form 
that you want to assemble. If you have this card deck available to your CMS 
card reader, you could issue an overriding FILEDEF command prior to assem- 
bling; that is, FILEDEF SYSIN READER. Now you can invoke the assembler as 
follows: 


HASM SAMPLE (options.... 


The name SAMPLE is used by the HASM as the file name for any TEXT or 

LISTING files produced by the assembler. An existing TEXT and/or LISTING file 

on your read/write A-disk would be replaced by new versions created by the 

HASM command processor. J 
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Similarly, if you have a tape containing an assembler input file that you want to 
assemble, you must issue the following command: 


FILEDEF SYSIN TAPn (RECFM F LRECL 80 BLOCK 80 


or, if the file were blocked 80x800, you could specify BLOCK 800 in the pre- 
ceding FILEDEF. In either case, the FILEDEF would be followed by the 
command HASM SAMPLE (options.... 


You can read OS/VS data sets on CMS files by defining those data sets with the 
FILEDEF command. For example, 


FILEDEF SYSIN DISK OSDS ASSEMBLE fm 
DSN OS DATASET (options... 
HASM (options... 


It is also possible to assemble a member of an OS/VS partitioned data set by 
using the MEMBER parameter of the FILEDEF command. 


The same techniques used in these examples can be applied to other ddnames. 
Care should be taken that any attributes specified for a file conform to the attri- 
butes expected by the assembler for the device. 


Using Macros 


Assembler Macros Supported by CMS 
There are several macros you can use in assembler programs. Among the ser- 
vices provided by these macros are the ability to write a record to disk, to read 
a record from disk, to write lines to a virtual printer, and so on. All the CMS 
assembler macros are described in VM/SP CMS Command and Macro Refer- 
ence. 


Macro Definition Library Additions 
source statement coding, to be retrieved by the COPY assembler instruction, 
and macro definitions may be added to a macro library. The CMS MACLIB 
command is used to create and modify CMS macro libraries. Details of this 
command are contained in VM/SP CMS Command and Macro Reference. 


Specifying Macro Libraries 
The GLOBAL command is used to identify which CMS libraries are to be 
searched for macro definitions and COPY code. Private libraries and CMSLIB 
may be concatenated with each other in any order by the GLOBAL command. 
The format of this command is described in VM/SP CMS Command and Macro 
Reference. 
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Assembling Your Program: HASM Command 


Once you have created or defined a source program, you assemble the 
program using the CMS HASM command. This command invokes the assem- 
bler program. This section describes how you use HASM. 





HASM Command Format 
You use the HASM command to create an object file from a source file. The 
source program can be created by the CMS editor, or it can be created 
externally and defined for use under CMS by the FILEDEF command. HASM 
takes the following form: 


HASM filename (options[) ] 


where ‘filename’ is the name of the file you are assembling and ‘options’ is a 
series of keywords used to specify functions associated with the assembler. 
The options are described in “Assembler Options for CMS.” 


File Name Entry 
When your file has been created by the CMS editor, you use the file name asso- 
ciated with the file when you issue the HASM command. If your file has been 
defined for use under CMS by the FILEDEF command, you use a dummy or 
unique file name to be used by the assembler to define the LISTING and TEXT 
files the assembler produces. You need not enter the standard CMS file-type 
field, since the default file type is ASSEMBLE. 


Assembler Options for CMS 


HASM offers a number of optional facilities. For example, you can suppress 
printing of your assembly listing or parts of the listing, and you can specify 
whether you want an object deck or an object module. You select the options 
by including appropriate keywords in the HASM command that invokes the 
assembler. There are three types of options: 





e Simple pairs of keywords: a positive form (such as OBJECT) that requests a 
facility, and an alternative negative form (such as NOOBJECT) that rejects 
that facility. 


= Keywords that permit you to assign a value to a function (such as 
LINECOUN(S50)). 


¢ HASM command processor options (such as PRINT) which are not passed 
to Assembler H but are used to control certain aspects of the assembly 
process. Such options are referred to in later sections as “CMS options” to 
distinguish them from Assembler H options. 


Each of these options has a standard or default value that is used for the 
assembly if you do not specify an alternative value. The default values are dis- 
cussed in “Command Defaults” below. 


The HASM command processor combines all the assembler options into a 
string of characters with a comma separating each option. This string is 
passed to the assembler when it ts invoked. If n options are specified (n> 1), 
then n-1 commas are inserted. The total number of characters in the assem- 
bler options plus the number of inserted commas must not be greater than 100. 
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The CMS options are not included in this count. You may specify the options in 
any order. If contradictory options are used (for example, LIST and NOLIST), 
the rightmost option (in this case, NOLIST) is used. 


| 

The command options are described under “Command Format.” 
Command Defaults 

If you do not code a given option in the HASM command, a default option will 
be assumed. The following default options are included when HASM is shipped 
by IBM: 
DECK, NOOBJECT, LIST, XREF(FULL), NORENT, NOTEST, NOBATCH, 
ALIGN, ESD, RLD, LINECOUN(55), FLAG(®), SYSPARM(), DISK, 
NUMBER, NOSTMT, NOTERM, NODBCS 
However, these may not be the default options in effect at your installation. The 
defaults could have been respecified when HASM was installed. For example, 
RENT could be made the default in place of NORENT. Also, a default option can 
be specified during installation so that you cannot override it. Similar consider- 
ations apply to the assembler ddnames for which the HASM command 
processor issues FILEDEFs. In the description of the HASM command, the 
options and ddnames specified as being “default values” are those included 
when HASM is shipped by IBM. 
You should determine which default values are in effect at your installation and 
whether there are any you cannot override. 

% Command Format 


The HASM command is used to invoke Assembler H to assemble a specified 
file. HASM processing and output are controlled by the options selected. 
IBM-supplied option defaults are underlined in the following discussion. 


Syntax 


HASM 
[filename] 
[( [ALIGN | NOALIGN] 
[.,BATCH | NOBATCH] 


[,DBCS | NODBCS] 
[,DECK | NODECK] 


[,ESD | NOESD] 

LFLAG(n | 0)] 
LLINECOUN(n | 55)] 

LLIST | NOLIST] 

[.NUM | NONUN] 
[OBJECT | NOOBJECT] 
[,PRINT | NOPRINT | DISK] 
[RENT | NORENT] 

[,RLD | NORLD] 

[STMT | NOSTMT 

[. SYSPARM(char-string | empty-string)] 
[TERM | NOTERM] 


¢ [TEST | NOTEST] 
[.XREF(FULL) | XREF(SHORT) | NOXREF] )] 
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filename 
is the file name of the source file to be assembled. The file specified must 
consist of fixed-length, 80-character records. If a user-issued FILEDEF for 
SYSIN is active, and if the FILEDEF specified DISK, the file name may be 
omitted. If the user FILEDEF specified TAPn or READER, a “dummy” file 
name must be supplied and is used to name the TEXT and LISTING files. lf 
no user FILEDEF for SYSIN is active, the source file must exist on an 
ACCESSed disk and must have a file type of ASSEMBLE. 





option-1,option-2,...,option-n 
specifies the option(s) to take affect. The iBM-supplied default options are 
underlined in the following list. 


ALIGN | NOALIGN 
specifies whether or not alignment checking is done. 


lf ALIGN is specified, the assembler does not suppress the alignment 
error diagnostic message; all alignment errors are diagnosed. 


If NOALIGN is specified, the assembler suppresses the diagnostic 
message “IEV033 ALIGNMENT ERROR” if fixed-point, floating point, or 
logical data referred to by an instruction operand is not aligned on the 
proper boundary. The message will be produced, however, for refer- 
ences to instructions that are not aligned on the proper (halfword) 
boundary or for data boundary violations for privileged instructions such 
as LPSW. In addition, DC, DS, DXD, or CXD constants, usually causing 
alignment, are not aligned. 


BATCH | NOBATCH 
specifies single or multiple assemblies. ~ 





If BATCH is specified, the assembler will do multiple (batch) assemblies 
under the control of a single HASM command. The source decks must 
be placed together in one file. The TEXT file produced will contain mul- 
tiple object decks. The LISTING file produced will contain multiple 
listings. 


If NOBATCH is specified, the BATCH option is suppressed. 


DBCS | NODBCS 
specifies whether or not the assembler will support double-byte data, as 
Summarized in Assembler H Version 2 General Information. Refer to 
Assembler H Version 2 Language Reference for details on how to 
program for double-byte data. 


DECK | NODECK 
specifies whether or not the object module is placed on the SYSPUNCH 
device. 


ESD | NOESD 
specifies whether or not the assembler will print an ESD (external 
symbol dictionary) with the listing. 
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FLAG(n | 0) 
Specifies the message level—the lowest severity code for which error 
messages are to be printed during assembly. Error diagnostic mes- 
sages below severity code n will not appear in the listing nor on the 
SYSTERM device. Diagnostic messages can have severity codes of 0, 
4, 8, 12, 16, or 20 (0 is the least severe). MNOTES can have a severity 
code of 0 through 255. 


Example: FLAG(8) will suppress messages for severity codes 0 through 
7. 


LINECOUN(n | 55) 
specifies the number of lines to be printed between headings in the 
listing. The permissible range is 1 to 32767 lines. 


Note: The heading occupies 5 of these lines. 


LIST | NOLIST 
specifies whether or not an assembler listing is printed. 


lf LIST is specified, an assembler listing is produced. Note that no diag- 
nostic information will be written on the SYSTERM device if NOTERM is 
the Assembler H default option chosen at installation time. 


If NOLIST is specified, no assembler listing is produced. This option 
overrides ESD, RLD, XREF, and LINECOUN. 


NUM | NONUM 
(CMS only) specifies whether or not the line number field (columns 73 to 
80 of the input records) is written on the SYSTERM device for state- 
ments for which diagnostic information is produced. 


OBJECT | NOOBJECT 
specifies whether or not the object module is placed on the SYSLIN 
device. 


The OBJECT and DECK options are independent of each other. Both or 
neither can be specified. The output on SYSLIN and SYSPUNCH is iden- 
tical, except that the control program closes SYSLIN with a disposition 
of LEAVE, and SYSPUNCH with a disposition of REREAD. 


PRINT | NOPRINT | DISK 
(CMS only) specifies where the LISTING file is written. 


If PRINT (PR) is specified, the LISTING file is written on the printer. The 
LISTING file is not written on disk. 


If NOPRINT (NOPR) is specified, the writing of the LISTING file is sup- 
pressed. Any assembler diagnostic messages to be written to the 
SYSTERM device are not affected. 


If DISK (DI) is specified, the LISTING Is written on a virtual disk. 


RENT | NORENT 
specifies whether or not a check is done on violation of program 
reenterability. 
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If RENT is specified, the assembler checks for a possible coding vio- 
lation of program reenterability. Code that makes your program 
nonreentrant is identified by an error message, but it cannot be an 
exhaustive check as the assembler cannot check the logic of the code. 
Therefore, it is possible to have nonreentrant code not flagged. 


If NORENT is specified, the RENT option is suppressed. 


RLD | NORLD 
specifies whether or not the assembler prints an RLD (relocation dic- 
tionary) with the listing. 


STMT|NOSTMT 
(CMS only) specifies whether or not the statement number assigned by 
the assembler is written on the SYSTERM device for those statements 
for which diagnostic information is produced. 


SYSPARM(char-string | empty-string) 
specifies the character string to be used as the default value of the 
&SYSPARM system variable symbol. char-string is the value of the 
system variable symbol &SYSPARM. The assembler uses &SYSPARM 
as a read-only SETC variable. If no value is specified for the SYSPARM 
option, &SYSPARM will be a null (empty) character string. 


In the CMS environment, ‘string’ cannot be longer than 8 characters. lf 
you wish to enter a string of more than 8 characters, use the 
SYSPARM(?) format. Using this form, you will be prompted at your ter- 
minal with the message: 


ENTER SYSPARM: 


You may then enter as many characters as you want up to the option 
limit of 100 characters. It is also necessary to use the SYSPARM(?) 
form to enter parentheses and/or embedded blanks in ‘string’. 


TERM(n) | NOTERM 
Specifies the ability to stop diagnostic information of a given severity 
from being written on the SYSTERM device. The value of n is a decimal 
number between O and 7, and can be thought of as a 3-bit binary 
number. It is this 3-bit “mask” that serves as the diagnostic message 
filter. Consider the 3 bits to be Jabeled bO, b1, b2 from left to right. 
Then, the following apply: 


bO = 1 suppress ‘ERROR' diagnostics 
bl = 1 suppress 'WARNING' diagnostics 
b2 = 1 suppress 'MNOTE' diagnostics 


For example, TERM(4) will suppress ERROR diagnostics, and TERM(S) 
will suppress ERROR and MNOTE diagnostics. 


If NOTERM is specified, the writing of all diagnostic information on the 
SYSTERM device is suppressed. NOTERM has the same effect as the 
option TERM(?7). 


Note: The TERM option under CMS is different than the TERM option 
under MVS. Under CMS, the Assembler H installation-time option 
TERM cannot be overridden. TERM, or NOTERM, is not passed from the 
CMS interface program, HASM, to Assembler H. HASM interrogates 
SYSPRINT output and determines if the line should be sent to the 
SYSTERM device. If TERM is the default option and if the default 
FILEDEFs are used, double messages are sent to the terminal. If TERM 
or NOTERM ts specified as an Assembler option, it is handled by HASM. 


72 Assembler H Version 2 Programming Guide 








9 


we 


TEST | NOTEST 
specifies whether or not the object module contains the special source 
symbol table (SYM cards). 


XREF(FULL) | XREF(SHORT) | NOXREF 
Specifies whether or not cross-reference information Is listed. 


If XREF(FULL) is specified, the assembler listing contains a cross- 
reference table of all symbols used in the assembly. This includes 
symbols that are defined but never referenced. The assembler listing 
also contains a cross-reference table of literals used in the assembly. 


If XREF(SHORT) is specified, the assembler listing contains a cross- 
reference table of all symbols that are referred to in the assembly. Any 
symbols defined but not referred to are not included in the table. The 
assembler listing also contains a cross-reference table of literals used 
in the assembly. 


lf NOXREF is specified, no cross-reference tables are printed. 


Assembler Data Sets and Storage Requirements 


This section describes the data set used by the assembler. It also describes 
the main storage and auxiliary storage requirements of the assembler. This 
description is intended for programmers who want to alter the assembler’s 
region size or data set parameters. 


Assembler Data Sets for CMS Users 


This section describes the data sets used by tne assembler to assemble your 
program under CMS; these data sets are referred to as files. 


ddname SYSUT1: The assembler uses this utility data set as an intermediate 
external storage device when processing the source program. This data set 
must be organized sequentially, and the device assigned to it must be a direct- 
access device. 


ddname SYSIN: This data set contains the input to the assembler—the source 
statements to be processed. The input device assigned to this data set may be 
DISK, READER, or TAPn, or another sequential input device that you have des- 
ignated. The FILEDEF command describing this data set appears in the input 
stream. 


ddname SYSLIB: From this data set, whose file type must be MACLIB, the 
assembler obtains macro definitions and assembler language statements that 
can be called by the COPY or a macro assembler instruction. It is a partitioned 
data set: Each macro definition or sequence of assembler language statements 
is a separate member, with the member name being the macro instruction 
mnemonic or COPY code name. The data set may be CMSLIB or a private 
macro library. OSMACRO contains macro definitions for the IBM-supplied OS 
macro instructions supported by CMS. DMSSP contains macro definitions for 
the IBM-supplied CMS macro instructions for VM/SP. Private libraries and 
CMSLIB can be concatenated with each other in any order by the GLOBAL 
command. 
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ddname S¥SPRINT: This data set is used by the assembler to produce a 

listing. Output may be directed to a printer, a magnetic tape, or a direct-access 

storage device. The default device is DISK. Assembler H uses machine control | 
characters for this data set, not American National Standards Institute (ANSI) ww 
characters. The smallest block size recommended is 1089 bytes (with a 

blocking factor of 9). 


ddname SYSPUNCH: The assembler uses this data set to produce a punched 
copy of the object module. The output unit assigned to this data set may be 
either a card punch or an intermediate storage device capable of sequential 
access. The object module is placed on the SYSPUNCH device if the assembler 
option DECK is specified. 


ddname SYSLIN: This is a direct-access storage device or a magnetic tape 
data set used by the assembler. It contains the same output text (object 
module) as SYSPUNCH. It is used as input for the CMS LOADER. The object 
module is placed on the SYSLIN device if the assembler option OBJECT is 
specified. 


ddname SYSTERM: This data set is used by the assembler to produce diag- 
nostic information. The output may be directed to a remote terminal, a printer, 
a magnetic tape, or a direct-access storage device. Assembler H uses machine 
control characters for this data set, not American National Standards Institute 
(ANSI) characters. The smallest block size recommended is 1089 bytes (with a 
blocking factor of 9). 


Assembler Virtual Storage Requirements 
The minimum virtual machine size required by the assembler is 344K bytes, in 
addition to the amount of space needed by the operating system under which 
Assembler H is running. However, better performance is generally achieved if 
the assembler is run in a larger virtual machine. 





If more virtual storage is allocated to the assembler, the size of buffers and 
work space can be increased. The amount of storage allocated to buffers and 
work space determines assembler speed and capacity. 


Loading and Executing Your Assembled Program 


Once you have assembled your program file, you can load and execute the 
resulting TEXT file (containing object code) using the CMS LOAD and START 
commands. The LOAD command causes your TEXT file to be loaded into 
storage in your virtual machine and the START command begins execution of 
the program. If you are assembling more than one file, use the CMS INCLUDE 
command to bring the additional files into storage. These commands and the 
options associated with them are described in VM/SP CP Command Reference 
for General Users. 
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CMS Register Usage during Execution of Your Program 
¢ CMS reserves four registers for its own use during the execution of an assem- 
a bler language program. When control is received from the user program, the 
entry point address for the program is placed in register 15. Register 1 con- 
tains the address of a parameter list, which contains any parameters passed to 
the program. Register 13 contains the address of the save area. Register 14 
contains the section address to return control to the control program. 


Passing Parameters to Your Assembler Language Program 
CMS provides you with the ability to pass parameters to an assembler lan- 
guage program by means of the START command. The statement below shows 
how to pass parameters to your program using the CMS START command: 


START MYJOB PARM1 PARM2 


The parameters must be no longer than 8 characters each, and must be sepa- 
rated by blanks. 


CMS creates a list of the parameters for use during execution. The parameter 
list for the command above would look like: 


PLIST DS OD 
DC CL8'MYJOB' 
DC CL8'PARM1 ' 
DC CL8'PARM2' 
DC BX" PR 


where the list is delimited by hexadecimal FFs. 


ad Creating a Module of Your Program 
When you are Sure that your program executes properly, you may want to 
create a module of it, so that you can execute it by simply invoking its file name 
on the command line. 


To create a module, you use the LOAD, GENMOD, and, in some cases, the 
LOADMOD commands. For more information, see the section in VM/SP CP 
Command Reference for General Users. 


Programming Aids 


This section contains reference information about the assembler. It describes 
the SYSTERM listing and the diagnostic messages generated by CMS. 


CMS SYSTERNM Listing 


The SYSTERM data set is used by the assembler to store a summary form of 
SYSPRINT containing flagged statements and their associated messages. 


You use the assembler option TERMINAL(n) to specify that you want a 
SYSTERM listing to be produced. 


Each diagnosed statement in the assembly listing printed in the SYSTERM 
listing is immediately followed by its associated error message. lf there are 
— multiple error messages associated with a source statement, the source state- 

ments will be listed once for each error message. 
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To help identify the position of the statement in your program, two additional 
assembler options are available: 


e NUMBER, which prints the line number(s) of the diagnosed statement 
* STMT, which prints the statement number assigned to the diagnosed state- 


ment by the assembler 


Format of the flagged statement: 


Name Operation Operand 
Line no. Statement no. Source records (columns 
(option NUMBER) (option STMT) 1-72 of the source 


Statement lines) 


Diagnostic Messages Written by CMS 
lf an error occurs during execution of the HASM command, a message may be 
typed at the terminal and, at completion of the command, register 15 contains a 
nonzero return code. 


There are two types of messages that may be issued: 


« Messages that are issued by the assembler (see Appendix D, “Assembler 
H Messages” on page 111) 


« Messages that are issued directly by the HASM command processor (refer 
to the following section) 


The messages issued directly by the HASM command processor are in two 
parts: a message code and the message text. The message code is in the form 
‘IEVCMSnnnt’, where IEVCMS indicates that the message was generated by the 
HASM command program, nnn is the number of the message, and t Is the type 
of message. The message text describes the error condition. 


The actual message typed may not be complete. By using the CP SET (EMSG) 
command, the user can specify that the entire error message be typed, or only 
the error code, or only the text, or neither code nor text. VM/SP CP Command 
Reference for Genera/ Users contains a description of the CP SET command. 


Unless NOTERM is specified, diagnostic and error messages originating in the 
assembler are typed at the terminal in the form lEVnnn text. Errors detected by 
the HASM command program, which terminate the command before Assembler 
H is called, result in error messages (type E). 


For additional information about the text, format, or codes in the messages for 
HASM, see VM/SP System Messages and Codes. 
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HASM Command Error Messages 


IEVCMSO02E FILE “fn ft fm’ NOT FOUND. 


Explanation: The filename you included in the 
HASM command does not correspond to the 
names of any of the files on your disks. 


Supplemental Information: The variable 
filename, filetype, and filemode in the text of the 
message indicate the file that could not be 
found. 


System Action: RC =28. Execution of the 
command terminates. The system remains in 
the Same status as before the command was 
entered. 


Programmer Response: Reissue the HASM with 
an appropriate filename. 


IEVCMSOO3E INVALID OPTION ‘option’. 


Explanation: You have included an invalid option 
with your HASM command. 


Supplemental Information: [he variable option in 
the text of the message indicates the invalid 
option. 


System Action: RC =24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Check the format of the 
HASM command, and reissue the command with 
the correct option. 


IEVCMSO04E IMPROPERLY FORMED OPTION 


‘option’. 


Explanation: You have included an improperly 
formed option with your HASM command. 


Supplemental Information: The variable option in 
the text of the message indicates the improperly 
formed option. 


System Action: RC =24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Check the format of the 
HASM command, and reissue the command with 
the correct option. 


IEVCMSOO6E NO READ/WRITE DISK ACCESSED. 


Explanation: Your virtual machine configuration 
does not include a read/write disk for this ter- 
minal session, or you failed to specify a 
read/write disk. 


System Action: RC = 36. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Issue an ACCESS 
command specifying a read/write disk. 


IEVCMSOO7E FILE ‘fn ft fm’ DOES NOT CONTAIN 
FIXED LENGTH 80 CHARACTER 
RECORDS. 


Explanation: The source file you specified in the 
HASM command does not contain fixed-length 
records of 80 characters. 


Supplemental Information: The variable 
filename, filetype, and filemode in the text of the 
message indicate the file that is in error. 


System Action: RC=32. The command cannot 
be executed. 


Programmer Response: You must reformat your 
file into the correct record length. CMS EDIT or 
COPYFILE can be used to reformat the file. 


IEVCMS010E FILENAME OMITTED AND DDNAME 
‘SYSIN’ IS UNDEFINED. 


Explanation: You have not included a filename 
in the HASM command, and no FILEDEF could 
be found for the ddname specified. 


System Action: RC=24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue the HASM 
command and Specify a filename, or issue a 
FILEDEF for the ddname specified. 
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HASM Command Error Messages 


IEVCMSOO02E FILE ‘fn ft fm’ NOT FOUND. 


Explanation: The filename you included in the 
HASM command does not correspond to the 
names of any of the files on your disks. 


Supplemental Information: The variable 
filename, filetype, and filemode in the text of the 
message indicate the file that could not be 
found. 


System Action: RC=28. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue the HASM with 
an appropriate filename. 


IEVCMSOO3E INVALID OPTION ‘option’. 


Explanation: You have included an invalid option 
with your HASM command. 


Supplemental Information: The variable option in 
the text of the message indicates the tnvalid 
option. 


System Action: ,RC=24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Check the format of the 
HASM command, and reissue the command with 
the correct option. 


IEVCMSO0O4E IMPROPERLY FORMED OPTION 


‘option’. 


Explanation: You have included an improperly 
formed option with your HASM command. 


Supplemental Information: The variable option in 
the text of the message indicates the improperly 
formed option. 


System Action: ,RC=24. Execution of the 
command terminates. The system remains itn 
the same status as before the command was 
entered. 


Programmer Response: Check the format of the 
HASM command, and reissue the command with 
the correct option. 


IEVCMSOO6E NO READ/WRITE DISK ACCESSED. 


Explanation: Your virtual machine configuration 
does not include a read/write disk for this ter- 
minal session, or you failed to specify a 
read/write disk. 


System Action: RC=36. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Issue an ACCESS 
command specifying a read/write disk. 


IEVCMSOO7E FILE ’fn ft fm’ DOES NOT CONTAIN 
FIXED LENGTH 80 CHARACTER 
RECORDS. 


Explanation: The source file you specified in the 
HASM command does not contain fixed-length 
records of 80 characters. 


Supplemental Information: The variable 
filename, filetype, and filemode in the text of the 
message indicate the file that is in error. 


System Action: RC +32. The command cannot 
be executed. 


Programmer Response: You must reformat your 
file into the correct record length. CMS EDIT or 
COPYFILE can be used to reformat the file. 


IEVCMSO10E FILENAME OMITTED AND DDNAME 
"SYSIN’ IS UNDEFINED. 


Explanation: You have not included a filename 
in the HASM command, and no FILEDEF could 
be found for the ddname specified. 


System Action: ,RC=24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue the HASM 
command and specify a filename, or issue a 
FILEDEF for the ddname specified. 


Chapter 7. Assembler Language Programming under CMS 77 


IEVCMSO11E FILENAME OMITTED AND FILEDEF 


“SYSIN’ 1S NOT FOR DISK. 


Explanation: You have not included a filename 
in the HASM command, and the FILEDEF for the 
ddname specified is not for disk. 


System Action: RC= 24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue the HASM 
command and specify a filename, or reissue the 
FILEDEF for the ddname specified with a device 
type of ‘DISK’. 


IEVCMS038E FILEID CONFLICT FOR DDNAME 


“SYSIN’. 


Explanation: You issued a FILEDEF command 
that conflicts with an existing FILEDEF for the 
ddname specified. 


Supplemental Information: The variable ddname 
in the text of the message indicates the ddname 
in error. 


System Action: RC=40. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue the FILEDEF 
command with an appropriate ddname. 


IEVCMS052E OPTIONS SPECIFIED EXCEED 100 


CHARACTERS. 


Explanation: The string of options that you spec- 
ified with your HASM command exceeded 100 
characters in length. 


System Action: RC = 24. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue your HASM 
command with fewer options specified. 
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IEVCMS074E ERROR {SETTING|RESETTING} 


IEVCMS070E INVALID PARAMETER ’parm’. 


Explanation: You specified an invalid parameter 
for an option in the HASM command. 


Supplemental Information: The variable param- 
eter in the text of the message indicates the 
invalid parameter. 


System Action: RC=40. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Check the format of the 
Option with its appropriate parameters, and 
reissue the command with the correct param- 
eter. 


AUXILIARY DIRECTORY. 


Explanation: One of two conditions causes this 
message to be generated: 


1. The disk containing the assembler modules 
(that is, the disk specified at auxiliary direc- 
tory generation by means of the GENDIRT 
mode field) has not been accessed. 


2. An attempt to reset the file status table has 
failed, thereby removing the auxiliary direc- 
tory from the search chain. Either the auxil- 
iary directory was not included in the file 
status table chain, or a processing error has 
caused the disk containing the assembler 
modules to appear to not be accessed. 


System Action: RC=40. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Verify that the disk con- 
taining the assembler modules has been 
accessed using the proper mode specification 
(that is, the mode specified by means of the 
GENDIRT mode field when the auxiliary directory 
was generated). If the error occurred resetting 
the auxiliary directory, contact installation main- 
tenance personnel. 








IEVCMS075E DEVICE ‘device’ INVALID FOR 
INPUT. 


Explanation: The device specified in your 
FILEDEF command cannot be used for the input 
operation that is requested in your program. For 
example, you have tried to read data from the 
printer. 


Supplemental Information: The variable device 
name in the text of the message indicates the 
incorrect device that was specified. 


System Action: RC=40. Execution of the 
command terminates. The system remains in 
the same status as before the command was 
entered. 


Programmer Response: Reissue your FILEDEF 
command, specifying an appropriate device for 
the desired input operation. 
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Chapter 8. Programming Considerations 


This chapter discusses various topics in assembler language programming. 


Saving and Restoring General Register Contents 


A problem program should save the values contained in the general registers 
upon commencing execution and, upon completion, restore to the general reg- 
isters these Same values. Thus, as control is passed from the operating system 
to a problem program and, in turn, to a subprogram, the status of the registers 
used by each program Is preserved. This is done through use of the SAVE and 
RETURN system macro instructions. 


The SAVE macro instruction should be the first statement in the program. It 
Stores the contents of registers 14, 15, and O through 12 in an area provided by 
the program that passes control. When a problem program !s given control, 
register 13 contains the address of an area in which the general contents 
Should be saved. 


If the program calls any subprograms, or uses any operating system services 
other than GETMAIN, FREEMAIN, ATTACH, and XCTL, it must first save the con- 
tents of register 13 and then load the address of an 18-fullword save area into 
register 13. This save area is in the problem program and is used by any sub- 
programs or operating system services called by the problem program. 


At completion, the problem program restores the contents of general registers 
14, 15, and 0 through 12 by use of the RETURN system macro instruction (which 
also indicates program completion). The contents of register 13 must be 
restored before execution of the RETURN macro instruction. 


The coding sequence that follows illustrates the basic process of saving and 
restoring the contents of the registers. A complete discussion of the SAVE and 
RETURN macro instructions and the saving and restoring of registers is con- 
tained in the appropriate Supervisor Services and Macro Instructions. 


BEGIN SAVE (14,12) 
USING BEGIN,15 
ST 13, SAVEBLK+4 
LA 13, SAVEBLK 
L 13, SAVEBLK+4 
RETURN (14,12) 
SAVEBLK DC 18F'O' 
END 
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Program Termination 


You indicate completion of an assembler language source program by using ves 
the RETURN system macro instruction to pass control from the terminating 
program to the program that initiated it. The initiating program may be the 
operating system or, tf a subprogram issued the RETURN, the program that 
called the subprogram. 


In addition to indicating program completion and restoring register contents, the 
RETURN macro instruction may also pass a return code—a condition indicator 
that may be used by the program receiving control. 


lf the return is to CMS, the return code is displayed to the user. 
lf return is to another problem program, the return code is available in general 
register 15, and may be used as desired. Your program should restore register 


13 before issuing the RETURN macro instruction. 


The RETURN system macro instruction is discussed in detail in the appropriate 
Supervisor Services and Macro Instructions manual. 
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Appendixes 


“Appendix A, Sample Program” provides a sample program that demon- 
strates many of the assembler language features. 


“Appendix B, MHELP Sample Macro Trace and Dump” lists the operation, 
name, and operand entries related to macro calls. 


“Appendix C, Object Deck Output” describes the object module output 
format. 


Appendix D describes the Assembler H error diagnostic messages and 
abnormal termination messages. 
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Appendix A. Sample Program 


The sample program included with Assembler H when it is received from IBM is 
described in this appendix. This program demonstrates some basic assembler 
language, macro, and conditional assembly features, most of which are unique 
to Assembler H. The letters in parentheses in the descriptions below refer to 
corresponding letters in the listing that precedes the descriptions. 
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BI GNAME 


SYMBOL 


A 
PD2 


BIGNAME SAMPLE PROGRAM, 


LOC 
000000 


000002 
QOO00A 
000012 
OOO01A 


OOOOTE 
000020 


00003C 
000098 
000098 
000040 


000040 


000042 
000048 
000050 


TYPE ID ADDR 


SD 0001 000000 O000DC 
CM 0002 000000 000702 


OBJECT CODE 


01230ABCO0102030A 
0B0C0102030A0B0C 
0102030A0B0C0102 
O30A0B0C 


0A23 
01230ABC0102030A 


5850 8098 
00000005 


1812 


000000090000 
413243 F6A8885A30 
338D313198A2E037 


ADDR1 ADDR2 


LENGTH LD ID FLAGS 


EXTERNAL SYMBOL DICTIONARY 


00 
00 


1ST TITLE STATEMENT HAS NO NAME, 2ND ONE O0cS 


STMT SOURCE STATEMENT 
2 A CSECT 
00000 3 USING *,8 
5 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH HH 
6 * PUSH AND POP STATEMENTS + 
7 * PUSH DOWN THE PRINT STATEMENT, REPLACE IT, RETRIEVE ORIGINAL # 
8 HHHHHHHHHHHHEHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH HH 
10 PUSH PRINT SAVE DEFAULT SETTING ' PRINT ON, NODATA,GEN’ 
11 PRINT NOGEN, DATA 
12 WTO =MF=(E,(1)) EXPANSION NOT SHOWN 
(c)14 DC X'123,ABC', (REALLYLONGSYMBOL- TRANSYLVANIA)B'1,10,11, 1010, 1011, 1100' 
15 POP PRINT RESTORE DEFAULT PRINT SETTING 
16 WTO MF=(E,(1)) EXPANSION SHOWN 
17+ SVC 35 ISSUE SVC 
18 DC X'123,ABC', (REALLYLONGSYMBOL=TRANSYLVANIA)B'1,10,11,1010, 1011, 1100' 
20 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHEHHHHHHHHHHHHHHHHHHHHHEHHHEHHHH 
21 * LOCTR INSTRUCTION # 
22 * LOCTR ALLOWS 'REMOTE' ASSEMBLY OF CONSTANT # 
23 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH HE 
00098 25 a 5, CONSTANT 
26 DEECEES LOCTR 
27 CONSTANT DC ae a CONSTANT CODED HERE, ASSEMBLED BEHIND LOCTR A 
28 A LOCTR RETURN TO 1ST LOCTR IN CSECT A 
30 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHRHHHHHHHHHHHHHHHHHHHHHHHHEH HH 
31 # 3 OPERAND EQUATE WITH FORWARD REFERENCE IN 1ST OPERAND # 
32 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHEHHHHHHHHHHHHH HHH 
34 A5 LR 1,2 L"AS: = 25. TNAS =. I 
35 PRINT DATA 
36 AT DC L'3.14159265358979323 846264 33832795028841972' L'A7T = 16,T'A7 = L 
37 &TYPE SETC T'A7 
38 A8 EQU B5,L'AS5,C'&TYPE' 
OO00AO +A8 EQU B5,L'AS,C'L' 


U 
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00100000 
00150000 


00250000 
00300000 
00350000 
00400000 


00500000 
00550000 
00600000 
00650000 


00700000 
00750000 
01-WTO 

00800000 


00900000 
00950000 
01000000 
01050000 


01150000 
01200000 
01250000 
01300000 


01400000 
01450000 
01500000 


01600000 
01650000 


01700000 
01750000 


01800000 
01800000 





(A) 


The external symbol dictionary shows a named common statement. The 
named common section is defined in statement 158. 


Statement 10: Save the current status of the PRINT statement 
(ON, NODATA,GEN). 


Statement 11: Leave ON in effect, modify the other two options to 
DATA,NOGEN. 


Statement 12: Macro call; note that the expansion (statement 13) is not 
printed. 


Statement 14: All 28 bytes of data are displayed to the two-operand DC. 
Statement 15: Restore prior status of PRINT. 


Statements 17 and 18: The generated output of the macro WTO is shown 
and only the first 8 bytes of the data are displayed. 


Statements 14 and 18: Multiple constants are allowed in hexadecimal and 
binary DC operands, and neither symbol in the duplication factor has been 
defined yet. Definition occurs in statements 108 and 109. 


Statements 26, 28, 136, and 155 illustrate use of the LOCTR assembler 
instruction. This feature allows one to break control sections down into 
subconfrol sections. It may be used in CSECT, DSECT, and COM. LOCTR 
has many of the features of a control section: for example, all of the first 
LOCTR in a section is assigned space, then the Second, and soon. The 
name of the control section automatically names the first LOCTR section. 
Thus LOCTR A is begun, or resumed, at statements 2, 28, and 155. Note 
that the location counter value shown each time is the resumed value of 
the LOCTR. On the other hand, various LOCTR sections within a control 
section have common addressing as far as USING statements are con- 
cerned, subject to the computed displacement falling within O through 
4095. In the sample, CONSTANT is in LOCTR DEECEES but the instruction 
referring to it (statement 25) has no addressing problems. 


Three-operand EQU. Here, we are assigning: (a) the value of B5 (not yet 
defined) to A8, (b) the length attribute of A5 to A8, and (c) the type attri- 
bute of A7 to A&. |f no operand is present in an EQU statement, the type 
attribute is U and the length attribute is that of the first term in the 
operand expression. Symbols present in the label and/or operand field 
must be previously defined. Note that it is not possible to express the 
type attribute of A7 directly in the EQU statement. The EQU statement at 
38 could have been written 


A8 EQU B5,2,C'L' 


A8 EQU BS,X'2',X'D3° 


Appendix A. Sample Program 87 


eping Burwmwesbolg Z UOISJOA H Je|\qwessy gg 


BIGNAME SAMPLE PROGRAM, 1ST TITLE STATEMENT HAS NO NAME, 2ND ONE DOES 


Loc OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT ASM H V O02 13.19 


© COO 


000058 7FFFFFFFCIC2C3C4 
000060 FFFFFFFF 
000064 181D 


FFFFFFE8 


EL) PEATE HE HE HE HE HE HE HEE HE HE HEH HH HE HE HE HE HH 2 He He ee 


41 * IMPLICIT DECLARATION OF LOCALS &A, &C -- USE OF SETC DUP FACTOR TO * 
* 


ho * PRODUCE SETC STRING LONGER THAN 8, MNOTE IN OPEN CODE 
LZ MRE EHHERE EERE EE EERE EH EEE EERHEE HEHEHE EEE HE EEE HEHEHE HEH 


45 &LA8 SETA L'A8 

46 &TA8& SETC T'A8 

47 MNOTE *,'LENGTH OF A8& = &LA8, TYPE OF A8 = &TA8' 
+#, LENGTH OF A8& = 2, TYPE OF A8 = L 

LQ &A SETA 2 

50 &C SETC (&A+3)'STRING,' 

51 MNOTE *,'&&C HAS VALUE = &C' 


+*,2C HAS VALUE = STRING, STRING, STRING, STRING, STRING, 


53 HHRHHEHHHHHHHHHHHHHRHEHRHHHHHHHHHHEHHHRHHRHERHHHRHHHEHHHHHHHHHRHHHEHHHHHHHE HHH HH HHH 


54 * EXAMPLES OF 4 BYTE SELF-DEFINED TERMS, UNARY + AND - * 
Cis Witatadadadahahadstadedahadadadedetahahatahatahahatatededatededa da hadatadahahatehetatahatatahadated tad tatehehe thatthe hehe dada ted hehe hal 


a7 DC A( 2147483647, C'ABCD' ,X'FFFFFFFF' ) 
38 LR -1+2, 16+-3 
60 X EQU 4 #6 
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01900000 
01950000 
02000000 
02050000 


02150000 
02200000 
02250000 
02250000 


02350000 
02400000 
02450000 
02450000 
02550000 
02600000 
02650000 
02750000 
02800000 


02900000 


(F) Set symbols &LA8 and &TA8 have not been declared in an LCL or GBL 
statement prior to their use here. Therefore, they are defaulted to local 
variable symbols as follows: &LA8 is an LCLA SET symbol because it 
appears in the name field of a SETA: &TA8 is an LCLC SET symbol 
because it is first used in a SETC. 


(G) MNOTEs may appear in open code. As such, they have all properties of 
MNOTEs inside macros, including substitution. 


(H) A SETC expression may have a duplicate factor. The SETA expression 
must be enclosed in parentheses and immediately precede the character 
String, the substring notation, or the type attribute reference. 


(1) Statements 57 through 60 illustrate 4-byte self-defining values and unary 
+ and -. The value of X will appear later in a literal address constant 
(see statement 162). 
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aping Bulwwesboig Z UOIsIaA H Jajquessy Qg 


B|GNAME 


LOC OBJECT CODE 


000066 
000068 
00006C 
000070 
000074 
000078 


OOOOTA 
OOOO7E 
000080 
000084 


INSERT PROGRAMMER MACRO 


1816 
9220 
5081 
58F1 
58FO 
OD5EF 


5850 
1B9A 
98CD 
5073 


1005 
0008 
0008 
FO30 


A008 


8090 
80A8 


ADDR1 ADDR2 


Q0005 


©) CEOOO 


© @® 


00008 
00008 
00030 


eC) 
00090 


O000A8 


STMT 


IN SOURCE STREAM NOW 


SOURCE STATEMENT 


ASM H V 02 13.19 


G2 KHHHHHHHHHHHHHHHRHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHRHHHHHHHHHHHHHEH 


63 # 
64 * 
65 *# 


MIXED KEYWORDS AND POSITIONAL PARAMETERS, 
STATEMENTS, DECLARATION AND USE OF SUBSCRIPTED SET SYMBOLS, * 
USE OF CREATED SET SYMBOLS, 


EXTENDED AGO AND AIF # 
EXTENDED SET STATEMENTS # 


66 HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHRHHHHHHRHHRHHHHHHHHHHHHHHRHHRHRHHHRHRRHHEHH 


70 &LOC(1) 


73° &N 
75 &N 


80 .MNOTE1 
82 .MNOTE2 


84 .MNOTE3 
85 .COMMON 


MACRO 
DEMO 
SETC 
GBLC 
&P 1 

SETA 
AGO 

SETA 
MNOTE 
AIF 


MNOTE 
AGO 
MNOTE 
AGO 
MNOTE 
AGO 
MNOTE 
L 


86 &XB(2) SR 9,10 


87 &( X&KEY1)(2) LM 12,13,=A(A5,X) 


88 &P2 ST 7,&P3 


91 ##HHH 


98+ 
99+ 
100+ 
101+ 
102+ 
103+ 


104+#, &KEY2 NOT 1,2, OR 3---USE &KEY3 


MEND 


GBLC 
SETC 
SETC 
SETC 
DEMO 


LR 
MV | 
ST 

L 

L 
BALR 


105+*, &KEY3 = 2 


106+ 


107+SUSQUEHANNA SR 9,10 
108+TRANSYLVANIA LM 12, 13,=A(A5, X) 


L 


&P1, &KEY1I=A, &P2, &KEY2=1, &P3, KKEY3=3, &PY 

a &LOC 1S DIMENSIONED LCLC BY DEFAULT 
&XA(5),&XB( 20), &XC(1) 
&SYSLIST(4),&SYSLIST(5),&SYSLIST(6),MF=E 


j 
(&KEY2).MNOTE1, .MNOTE2, .MNOTE3 
2 


#,'&&KEY2 NOT 1,2, OR 3---USE &&KEY3 IN PLACE OF IT' 
(&KEY3 EQ 1),.MNOTET, 


(&KEY3 EQ 2).MNOTE2, (&KEY3 EQ 3).MNOTE3 


* "BOTH &&KEY2 AND &&KEY3 FAIL TO QUALIFY' 

. COMMON 

#) '&@&KEY&LOC(&N) = 1' 

. COMMON 

#, "@&KEYeRLOC(&N) = 2' 

, COMMON 

#, '&@eKEY&LOC(&N) = 3' 

5,8(,10) NOTE THAT OPCODES, OPERANDS & COMMENTS 


ON MODEL STATEMENTS 
ARE KEPT IN PLACE UNLESS DISPLACED 
AS A RESULT OF SUBSTITUTION 


DEMO MACRO’ INSTRUCTION (CALL) 
&XA(1),&XB(2),&XC(3) 

'A', "MISSISSIPPI' 

'B' , 'SUSQUEHANNA' 

'C' 'TRANSYLVANIA' 

KEY3=2, WRITE, REALLYLONGSYMBOL, 

A8+8*( B5-CONSTANT-7)(3),KEY1=C, (6), SF, 


(8), KEY2=7 

1,6 LOAD DECB ADDRESS 
5(1),xX'20' SET TYPE FIELD 

8,8(1,0) STORE DCB ADDRESS 
15,8(1,0) LOAD DCB ADDRESS 

15,48(0,15) LOAD RDWR ROUTINE ADDR 
14,15 LINK TO RDWR ROUTINE 


IN PLACE OF IT 


NOTE THAT OPCODES, OPERANDS & COMMENTS 
ON MODEL STATEMENTS 
ARE KEPT IN PLACE UNLESS DISPLACED 


3,8(,10) 


109+REALLYLONGSYMBOL ST 7,A8+8*(B5-CONSTANT-7)(3) 


+ 


AS A RESULT OF SUBSTITUTION 
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03000000 
03050000 
03100000 
03150000 
03200000 


03300000 
03350000 
03400000 
03450000 
03500000 
03550000 
03600000 
03650000 
03700000 


X03750000 


03800000 
03850000 
03900000 
03950000 
04000000 
04050000 
04100000 
04150000 
04200000 
04250000 
04300000 
04350000 
04400000 


04500000 


04600000 
04650000 
04700000 
04750000 


MO4800000 
NO4850000 


04900000 
03-!1HBRD 
03-!1HBRD 
03-I1HBRD 
03-!HBRD 
03-1HBRD 
03-1HBRD 
01-00076 
01-00082 
01-00085 
01-00086 
01-00087 


X01-00088 








The programmer macro DEMO is defined after the start of the assembly. 
Macros can be defined at any point and, having been defined and/or 
expanded, can be redefined. Note that the parameters on the prototype 
are a mixture of keywords and positional operands. &SYSLIST may be 
used. The positional parameters are identified and numbered 1, 2, 3 from 
left to right; Keywords are skipped over. 


Statement 70 illustrates the extended SET feature (as well as implicit dec- 
laration of &LOC(1) as an LCLC). Both &LOC(1) and &LOC(2) are 
assigned values. One SETA, SETB, or SETC statement can then do the 
work of many. 


statement 72 is a model statement with a symbolic parameter in its oper- 
ation field. This statement will be edited as if it is a macro call; at this 
time, each operand will be denoted as positional or keyword. At macro 
call time, it will not be possible to reverse this decision. Even though 
treated as a macro, it is still expanded as a machine or assembler opera- 
tion. 


Statement 74 illustrates the computed AGO statement. Control will pass 
to .MNOTE1 if &KEY2 is 1, to MNOTE2 if &KEY2 is 2, to MNOTES if &KEY2 
is 3 or will fall through to the model statement at 75 otherwise. 


statement 77 illustrates the extended AIF facility. This statement is 
written in the alternative format. The logical expressions are examined 
from left to right. Control passes to the sequence symbol corresponding 
to the first true expression encountered, else falls through to the next 
model statement. 


statement 87 contains a subscripted created SET symbol in the name 
field. Exclusive of the subscript notation, these SET symbols have the 
form &(e), where e is an expression made up of character strings and/or 
variable symbols. When such a symbol is encountered at expansion time, 
the assembler evaluates e and attempts to use &(value) in place of &(e). 
Looking ahead, we see that DEMO is used as a macro instruction in state- 
ment 97 and &KEY1=C. Thus, the ‘e’ in this case is X&KEY1, which has 
the value XC. Finally, the macro-generator will use &XC(2) as the name 
field of this model statement. In statement 108, note that &XC(2) equals 
TRANSYLVANIA (statement 96). Finally, in the sequence field of statement 
108, we see that this statement is a level 01 expansion of a programmer 
macro and the corresponding model statement is statement number 87. 


Created SET symbols may be used wherever regular SET symbols are 
used in declarations, name fields, or operands of SET statements, in 
model statements, etc. Likewise, they are subject to all the restrictions of 
regular SET symbols. In the programmer macro DEMO, it would not have 
been valid to have the statement GBLC &(X&KEY1)(1) because, in state- 
ment 71, &XA, &XB, and &XC are declared as global variable symbols and 
&(X&KEY1)(2) becomes &XC(2) unless, of course, &KEY1 were assigned 
something other than the value A, B, or C in the macro instruction DEMO, 
statement 97. In that case, we would need a global declaration statement 
if we wanted &(X&KEY1) to be a global SET symbol. Because global dec- 
larations are processed at generation time and then only if the statement 
is encountered, we would insert the following statements between, say, 
statements 71 and 72: 

AIF ('&KEY1' EQ 'A' OR '&KEY1' EQ 'B' OR '&KEY1' EQ 'C').SKIP 

GBLC &(X&KEY1) (1) 

~SKIP ANOP 
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As the macro is defined, &(X&KEY1) will be a global SETC if &KEY1 is A, 
B, or C; otherwise it will be a LCLC or, possibly, a LCLA. In the macro, if 
&(X&KEY1) becomes a local, it will have a null or zero value. 





(P) In statements 93 and 94, note that &XA is declared as a subscripted global 
SETC variable with a maximum subscript of 1 and, in the next statement 
(an extended SET statement), we store something into &XA(2). There is 
no contradiction here. The statement GBLC &XA(1) marks &XA as a sub- 
scripted global SETC symbol. Any decimal self-defined number (1 through 
2147483647) can be used. Furthermore, only a nominal amount of space is 
set aside in the global dictionary. This space is open-ended and will be 
increased on demand and only on demand. 


(Q) Statement 97 is the macro instruction DEMO. Note that &P1 has the value 
WRITE. Therefore, the model statement at statement 72 becomes an inner 
macro, WRITE, producing the code at statements 98-103. The sequence 
field of these statements contains 03-IHBRD, indicating that they are gen- 
erated by a level 03 macro (DEMO is 01, WRITE is 02) named IHBRDWRS. 
It is an inner macro called by WRITE. 


(R) Statements 108 and 109 contain some ordinary symbols longer than 8 
Characters. The limit for ordinary symbols, operation codes (for pro- 
grammer and library macros and operation codes defined through 
OPSYN), variable symbols, and sequence symbols is 63 characters 
(including the & and . in the latter two instances, respectively). Most long 
symbols will probably be nearer to 8 than 63 characters in length. 
Extremely long symbols are simply too difficult to write, especially if the 
symbol is used frequently. The requirement that the operation field be 
present in the first statement of a continued statement is still in effect. \ 
Furthermore, names of START, CSECT, EXTRN, WXTRN, ENTRY, etc., 
symbols are still restricted to 8 characters. 
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CG wesbolg ejdwes ‘y xipuedd\ 


C 


B!tGNAME 


LOC 


000088 
OOO08A 
OOOO8E 


OO0009C 
OO009C 
OQ00A0 


OO00A8 


QOOODC 
OOOODC 
000090 


000000 
000000 
0007D0 


000090 


INSERT PROGRAMMER MACRO 


OBJECT CODE 


1816 
58FO 1054 
O5EF 


00000000 
OBOOOOA000000050 


E3CODHC5SHOTEXOF 1 


1867 
OOOOOOKHOFFFFFFE8 


() 


© 


00054 


Oe © 


ADDR1 ADDR2 STMT 


126 


129 
130 
131+ 
132+ 
133+ 


135 
136 


137 


139 
140 
141 


143 
T44 
4 


146 
147 
148 
149 
150 


152 
153+ 
154+ 
155 


157 
158 
159 
160 
161 
162 


( 


IN SOURCE STREAM NOW 
SOURCE STATEMENT ASM H V 02 13.19 
HHRHEHHHEHHRHREHEHEHHERHHEHEHEBRHREHHHHHHHRHEHHRHRHHRHRHEHRHHRHEHHHRHHHHRHRHEHRE HEH HHH HHEKNH HHH HH 
* COPY 'NOTE' MACRO IN FROM MACLIB, RENAME IT 'MARK', CALL IT UNDER * 
* ITS ALIAS -- IN EXPANSION OF MARK, NOTICE REFERENCE BACK TO # 
* DEFINITION STATEMENTS IN ‘COLUMNS' 76-80 OF EXPANSION # 
HHHHHEHHEHHHHEHBHHHHHHHEHHHHHEHHHHHHHEHHHHHHH HHH HE HRHHHHHHHHHHHHHHHHHHHHE HHH EH 
COPY NOTE 
MACRO 
&NAME NOTE &DCB, &DUMMY= 
AIF ('@dCB' EQ '').ERR 
&NAME |HBINNRA &DCB 
le 15,84(0,1) LOAD NOTE RTN ADDRESS 
BALR 14,15 LINK TO NOTE ROUTINE 
MEXIT 
. ERR IHBERMAC 6 
MEND 
MARK OPSYN NOTE COMMENTS OF GENERATED STATEMENTS OCCUPY SAME 
MARK (6) 'COLUMNS' AS THOSE IN MODEL STATEMENTS 
LR 1,6 LOAD PARAMETER REG 1 
[i 15,84(0,1) LOAD NOTE RTN ADDRESS 
BALR 14,15 LINK TO NOTE ROUTINE 
De ee ee ee ee ee ee ee ee 


DEECEES LOCTR SWITCH TO ALTERNATE LOCATION COUNTER 
B5 CCW X'0B',B5,0, 80 
HEHE AEE HEHEHE HEHEHE AEE HEHE IE HEHE DEE EE EEE HE EEE SE ESE EE HE EE SEE EEE EEE EEE EEE EE 


* DISPLAY OF &SYSTIME, &SYSDATE, &SYSPARM AND &SYSLOC - 
Data d ahold cakchah hada thah kadadak kakahatadtakahidahs hath hahahaha hakahatahaditatidsdahaletehahahalakahahahaketahahahahamakahabal 


PRINT NODATA 
DC C'TIME = &SYSTIME, DATE = &SYSDATE, PARM = &SYSPARM' 
DC C'TIME = 13.19, DATE = 02/19/82, PARM = SAMPLE PROGRAM’ 
MACRO 
LOCATE 
&SYSECT CSECT DISPLAY OF CURRENT CONTROL SECTION 
&SYSLOC ‘LOCTR AND LOCATION COUNTER 
MEND 
LOCATE 
A CSECT DISPLAY OF CURRENT CONTROL SECTION 
DEECEES LOCTR AND LOCATION COUNTER 
A LOCTR 
EEE HEHEHE EE HEE HEE HEE HEHE AEE HEE EE EEE EE EEE EEE HEE EEE 


PD2 COM NAMED COMMON THROWN IN FOR GOOD MEASURE 
DS 5OOF 
LR 6,7 
END 


=A(A5,X) 


( ‘ 
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05000000 
05050000 
05100000 
05150000 
05200000 


05300000 
60020000 
00040017 
00060000 
00080000 
00100000 
007120000 
00140000 
00160000 
007180000 


05450000 
05500000 
02-1HBIN 
0171-00122 
0171-00123 


05600000 
05650000 


05700000 


05800000 
05850000 
05900000 


06000000 
06050000 
06050000 


06150000 
06200000 
06250000 
06300000 
06350000 


06450000 
0171-00148 
01-00149 
06500000 


06600000 
06650000 
06700000 
06750000 
06800000 


(S) Library macros may be inserted into the source stream as programmer 
macros by use of a COPY statement. The result (statements 118 to 126) is 
essentially a programmer macro definition. When a library macro is 
brought in and expanded by use of a macro instruction, the assembler (1) 
looks the macro up by its member-name and (2) verifies that this same 
name is used in the operation field of the prototype statement. Therefore, 
for example, DCB has to be cataloged as DCB. However, as COPY code, 
the member name bears no relationship to any of the statements in the 
member. Thus, several variations of a given macro could be stored as a 
library under separate names, then copied in at various places in a single 
assembly as needed. (Assembler H allows you to define and redefine a 
macro any number of times). 





(T) In statement 129, MARK is made a synonym for NOTE. To identify NOTE 
as a macro, it has to be used as either a system macro call (that is, from 
a macro library) or a programmer macro definition prior to its use in the 
operand field of an OPSYN statement. The COPY code at 118 through 126 
iS a programmer macro definition. The macro instruction at statement 130 
is MARK. We can use MARK and NOTE interchangeably. If desired, we 
could remove NOTE as a macro definition in the following way: 


MARK OPSYN NOTE 
NOTE OPSYN 


We could then refer to the macro only as MARK. 


(U) Statement 144 demonstrates &SYSTIME, &SYSDATE and &SYSPARM. The 
values for the first two are the Same as we use in the heading line. The 
value for &SYSPARM is the value passed in the PARM field of the EXEC 
statement of the default value assigned to &SYSPARM when Assembler H 
is installed. 


(V) System variable symbols &SYSLOC and &SYSECT are displayed. The 
sequence field indicates that the model statements are statements 148 
and 149. 





(W) Ilustration of named COMMON. You can establish addressability for a 
named COMMON section with: 


USING section-name, register 


You can address data in a blank COMMON section by labeling a state- 
ment after the COMMON statement and using relative addressing. 


(X) If there are literals outstanding when the END statement is encountered, 
they are assigned to the LOCTR currently in effect for the first control 
section in the assembly. This may or may not put the literals at the end of 
the first control section. In this sample assembly, the first control section, 
A, has two LOCTRs, A and DEECEES. Because A is active (at statement 
155), the literals are assembled there. You always have the ability to 
control placement of literal pools by means of the LTORG statement. Note 
that X‘FFFFFFE8’ is used for the contents of A(A5,X), statement 162. The 
symbol X was assigned the value (4*-6) by an EQU in statement 60. 
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GR weibolg ajdwes ‘vy xipueddy 


BIGNAME 


POS.ID REL. ID FLAGS ADDRESS 


( ( 


RELOCATION DICTIONARY PAGE 6 


ASM H V 02 13.19 02/19/82 


0001 OCO1 Oc 000090 
0001 0001 08 OOQOA1 
BI GNAME CROSS REFERENCE PAGE 7 
SYMBOL LEN VALUE DEFN REFERENCES ASM H V 02 13.19 02/19/82 
A 90001 00000000 0002 0028 0153 0155 
A5 00002 000040 0034 0038 0162 
A7 00016 000048 0036 
A8& 00002 OOOD00AN0 0038 0109 
B5 00008 OOONDAD 0137 0038 0109 0137 
CONSTANT OOO004 000098 0027 0025 0109 
DEECEES 00001 00000098 0026 0136 0154 
PD2 00001 00000000 0158 
REALLYLONGSYMBOL 
00004 000084 0109 0014 0018 
SUSQUEHANNA 
00002 OOOO7E 0107 
TRANSYLVANIA 
00004 000080 0108 0014 0018 
Xx QO0001 FFFFFFE8 0060 0162 
=A(A5,X) 00004 000090 0162 0108 
B!GNAME DIAGNOSTIC CROSS REFERENCE AND ASSEMBLER SUMMARY PAGE 8 


ASM H V 02 13.19 02/19/82 


NO STATEMENTS FLAGGED IN THIS ASSEMBLY 


OVERRIDING PARAMETERS- SYSPARM( SAMPLE PROGRAM), NODECK, BATCH 


OPTIONS FOR THIS ASSEMBLY 


NODECK, OBJECT, LIST, XREF(FULL), NORENT, NOTEST, BATCH, ALIGN, ESD, RLD, NOTERM, LINECOUNT(55), 
FLAG(O), SYSPARM(SAMPLE PROGRAM) 


NO OVERRIDING DD NAMES 


136 CARDS FROM SYSIN 
198 LINES OUTPUT 


524 CARDS FROM SYSLIB 
11 CARDS OUTPUT 














Appendix B. 


MHELP Sample Macro Trace and Dump 


The macro trace and dump (MHELP) facility is a useful means of debugging 
macro definitions. MHELP can be used anywhere in the source program or in 
macro definitions. MHELP is processed during macro generation. It is com- 
pletely dynamic; you can branch around the MHELP statements by using AIF or 
AGO statements. Therefore, its use can be controlled by symbolic parameters 
and SET symbols. 


The following sample program illustrates the five primary functions of MHELP. 
Because most of the information produced is unrelated to statement numbers, 
the dumps and traces in the listing are marked with numbers in parentheses. 
Most dumps refer to statement numbers. If you request MHELP information 
about a library macro definition, the first five characters of the macro name will 
appear in place of the statement number. To get the statement numbers, you 
should use COPY to copy the library definition into the source program prior to 
the macro call. 


MHELP 1, Macro Call Trace: Item (1A) illustrates an outer macro call, (1B) an 
inner one. In each case, the amount of information given is brief. This trace is 
given after successful entry into the macro; no dump is given if error conditions 
prevent an entry. 


MHELP 2, Macro Branch Trace: This provides a one-line trace for each AGO 
and true AIF branch within a programmer macro. In any such branch, the 
“branched from” statement number, the “branched to” statement number, and 
the macro name are included. Note, in example (2A), the “branched to” state- 
ment number indicated is not that of the ANOP statement bearing the target 
sequence symbol but that of the statement following it. The branch trace facility 
is suspended when library macros are expanded and MHELP 2 is in effect. To 
obtain a macro branch trace for such a macro, one would have to insert a 
COPY “macro-name” statement in the source deck at some point prior to the 
MHELP 2 statement of interest. 


MHELP 4, Macro AIF Dump: Items (4A), (4B), (4C),... are examples of these 
dumps. Each such dump includes a complete set of unsubscripted SET symbols 
with values. This list covers all unsubscripted variable symbols that appear in 
the same field of a SET statement in the macro definition. Values of elements 
of dimensioned SET symbols are not displayed. 


MHELP 8, Macro Exit Dump: This provides a dump of the same group of SET 
symbols as are included in the macro AIF dump when an MEXIT or MEND is 
encountered. 


Note: Local and/or global variable symbols are not displayed at any point 
unless they appear in the current macro explicitly as SET symbols. 
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MHELP 16, Macro Entry Dump: This provides values of system variable 
symbols and symbolic parameters at the time the macro is called. The fol- 
lowing numbering system is used: 





Number Item 


O00 &SYSNDX 

001 &SY SECT 

002 &SYSLOC 

003 &SYSTIME 

004 &SYSDATE 

005 &SYSPARM 

O06 Name Field on Macro Instruction 


If there are NKW keyword parameters, they follow in order of appearance on 
the prototype statement. 


007 lst keyword value 
008 2nd keyword value 
OO6+NKW NKWth keyword value 


If there are NPP positional parameters, they follow tn order of appearance in 
the macro instruction. 


007+NKW lst positional parameter values 
OO8+NKW 2nd positional parameter values 
OO6+NKW4+NPP NPPth positional parameter values 





For example, item (16A) has one keyword parameter (& OFFSET) and one posi- 
tional parameter. The value of the keyword parameter appears opposite 
110006, the positional parameter, opposite 110007. In both the prototype (state- 
ment 3) and the macro instruction (statement 54), the positional parameter 
appears in the first operand field, the Keyword in the second. A length appears 
between the NUM and VALUE fields. A length of NUL indicates the corre- 
sponding ttem is empty. 


Item (16B) illustrates an inner call containing zero keywords and two positional 
parameters. 


MHELP 64, Macro Hex Dump: This option, when used in conjunction with the 
Macro AIF dump, the Macro Exit dump or the Macro Entry dump, will dump the 
parameter and SETC symbol values in EBCDIC and hexadecimal formats. 


Notes: 


1. The hexadecimal dump will precede the EBCDIC dump and will dump the 
full value of the symbol. 


2. System parameters are not dumped in hexadecimal. 
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LOC OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT ASM H V 02 13.19 02/19/82 
000000 1 CSECT 06850000 
2 + COPY LNSRCH 06900000 
3 MACRO 06950000 
4 &NAME LNSRCH &ARG, &OF FSET=STNUMB-STCHAIN 07000000 
5 LCLC &LABEL 07050000 
6 &LABEL SETC 'A&SYSNDX' GENERATE SYMBOL 07100000 
7 AIF (T" &NAME EQ 'O').SKIP 07150000 
8 &LABEL SETC &NAME ! 1F MACRO CALL HAS LABEL, USE IT 07200000 
9 .SKIP ANOP INSTEAD OF GENERATED SYMBOL 07250000 
10 &LABEL LA O, OF FSET LOAD REG. O 07300000 
11 SCH| &ARG,O(1) SEARCH 07350000 
12 BC 1, &LABEL |F MAX REACHED, CONTINUE 07400000 
13 MEND 07450000 
PAGE 3 

LOC OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT ASM H V 02 13.19 02/19/82 
15 # COPY SCHI 07550000 
16 MACRO 07600000 
17 &NM SCHI &COMP,&LIST 07650000 
18 LCLA &CNT 07700000 
19 LCLC &CMPADR 07750000 
20 &CNT SETA 1 07800000 
21 &NM STM 1,15,4(13) 07850000 
22 .TEST ANOP 07900000 
23 &CMPADR SETC "&CMPADR' .' &COMP! (&CNT, 1) 07950000 
24 AIF (*&COMP'(&CNT,1) EQ '(').LPAR 08000000 
25 &CNT SETA &CNT+1 08050000 
26 AIF  (&CNT LT K'&COMP).TEST 08100000 
27 .NOLNTH ANOP 08150000 
28 LA 3, &COMP COMPARAND 08200000 
29 AGO . CONTIN 08250000 
30 .LPAR AIF ('&COMP'(&CNT+1,1) EQ ',').FINISH 08300000 
31 &CNT SETA &CNT+1 08350000 
32 AIF (&CNT LT K'&COMP).LPAR 08400000 
33 AGO .NOLNTH 08450000 
34 .FINISH ANOP 08500000 
35 &CMPADR SETC '&CMPADR'.'&COMP' (&CNT+2, K' &COMP-&CNT ) 08550000 
36 LA 3,&CMPADR COMPARAND SANS LENGTH 08600000 
37 .CONTIN ANOP 08650000 
38 LA 1,&LIST LIST HEADER 98700000 
39 MVC &COMP,0(0) DUMMY MOVE TO GET COMP LENGTH 08750000 
4O ORG *#-6 CHANGE MVC TO MVI 08800000 
41 DC X'g2!' MVI OPCODE 08850000 
42 ORG H+ 1 PRESERVE LENGTH AS IMMED OPND 08900000 
43 DC x'pooo' RESULT IS MVI 0(13),L 08950000 
yy L 15,=V(SCHI) 09000000 
45 BALR 14,15 09050000 
6 LM 1,15,4(13) 09100000 
47 MEXIT 09150000 
48 MEND 09200000 
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LOC OBJECT CODE ADDR1 ADDR2 = STMT 


000000 50 
000000 O05CO 51 
00002 52 

54 

55 


000002 4100 0002 00002 56+A0001 LA 
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SOURCE STATEMENT ASM H V 02 13.19 02/19/82 


TEST CSECT 09300000 
BALR 12,0 09350000 
USING #,12 09400000 
MHELP B'11111' 09500000 
LNSRCH LISTLINE, OFFSET=LISTLINE-LISTNEXT 09550000 


++//MHELP. CALL TO MACRO LNSRCH DEPTH=001, SYSNDX=0001, STMT 00055 


//MHELP ENTRY TO LNSRCH . MODEL STMT 00000, DEPTH=001, SYSNDX=0001, KWCNT=001 
////PARAMETERS (SYSNDX, SYSECT, SYSLOC, SYSTIME,SYSDATE, SYSPARM, NAME, KWS, PPS) /// 
//NUM LNTH VALUE (64 CHARS/LINE) 

//0000 O04 0001 

//0001 O04 TEST 

//0002 O04 TEST 

//0003 O05 13.19 

//0004 008 02/19/82 

//0005 014 SAMPLE PROGRAM 

//0006 NUL 

//0007 O17 LISTLINE-LISTNEXT 

//0008 O08 LISTLINE 


//MHELP AIF IN LNSRCH . MODEL STMT 00007, DEPTH=001, SYSNDX=0001, KWCNT=001 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 
//0000 LCLC LABEL LNTH= 005 
// VAL=A0001 
++//MHELP. BRANCH FROM STMT OOOO7 TO STMT 00010 IN MACRO LNSRCH 
0, LISTLINE-LISTNEXT LOAD REG. O 01-00010 


++//MHELP. CALL TO MACRO SCHI DEPTH=002, SYSNDX=0002, STMT 00011 


//MHELP ENTRY TO SCHI MODEL STMT O0000, DEPTH=002, SYSNDX=0002, KWCNT=000 
////PARAMETERS (SYSNDX, SYSECT, SYSLOC, SYSTIME, SYSDATE, SYSPARM, NAME, KWS, PPS) /// 
//NUM LNTH VALUE (64 CHARS/LINE) 

//0000 OO4 0002 

//0001 OO4 TEST 

//0002 OO4 TEST 

//0003 005 13.19 

//0004 008 02/19/82 

//0005 014 SAMPLE PROGRAM 

//0006 NUL 

//0007 O08 LISTLINE 

//0008 OO4 0(1) 


000006 901F DOO4 00004 51+ STM 1,15,4(13) 02-0002 1 


//MHELP AIF IN SCH | MODEL STMT 00024, DEPTH=002, SYSNDX=0002, KWCNT=000 





Lo 
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LOG OBJECT CODE 


ADDR1 ADDR2 


STMT 


O® © 


QO @ 


(> 


SOURCE STATEMENT 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS). // 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=L 


//MHELP AIF 1N SCH | ». MODEL STMT 00026, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=L 


++//MHELP. BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCHI 


//MHRELP AIF IN SCH I MODEL STMT 00024, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=L | 


//MHELP AIF IN SCH | . MODEL STMT Q0026, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=LI 


++//MRELP. BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCH| 


//MHELP AIF IN SCH | . MODEL STMT 00024, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS). // 

//0000 LCLA CNT VAL= 

//0001 LCLC CMPADR LNTH= 
// VAL=LIS 


//MHELP AIF EN SCH I MODEL STMT 00026, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=LIS$ 


++//MHELP. BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCH| 


//MHELP AIF IN SCH | MODEL STMT OO0024, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=LIST 
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ASM H V 02 13.19 02/19/82 


o00g00000001 
001 


KWCNT=000 


0000000002 
001 


KWCNT=000 


0000000002 
002 


KWCNT=000 


0000000003 
002 


KWCNT=000 


0000000003 
003 


KWCNT=000 


OO00000004 
003 


KWCNT=000 


0000000004 
004 
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LOC OBJECT CODE ADDR1 ADDR2 


Td: 


SOURCE STATEMENT 


//MHELP AIF 


//0000 LCLA 


IN 
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ASM H V 02 13.19 02/19/82 


SCH | MODEL STMT 00026, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 

CNT VAL= 

CMPADR LNTH= 


//0001 LCLC 
V4L=LIST 


++//MHELP. 


//MHELP AIF 


//0000 LCLA 
//0001 LCLC 


IN 


// VAL=LISTL 


BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCHI 
SCHI MODEL STMT 00024, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS). // 
CNT VAL= 
CMPADR LNTH= 
SCHI MODEL STMT 00026, DEPTH=002, SYSNDX=0002, 


//MHELP AIF 


IN 


////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT VAL= 
//0001 LCLC CMPADR LNTH= 
// VAL=LISTL 

++//MHELP, BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCHI 

//MHELP AIF IN SCH | MODEL STMT 00024, DEPTH=002, SYSNDX=0002, 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS). // 

//0000 LCLA CNT VAL= 

//0001 LCLC CMPADR LNTH= 
77 VAL=L!ISTLI 

//MHELP AIF IN SCH | MODEL STMT 00026, DEPTH=002, SYSNDX=0002, 


////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 
CNT 


//0000 LCLA VAL= 

//0001 LCLC CMPADR LNTH= 
TI VAL=LISTLI 

++//MHELP. BRANCH FROM STMT 00026 TO STMT 00023 IN MACRO SCHI 

//MHELP AIF IN SCHI MODEL STMT 00024, DEPTH=002, SYSNDX=0002, 


////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS).// 


//0000 LCLA CNT 
//0001 LCLC CMPADR 
// VAL=LISTLIN 
//MHELP AIF IN SCH | 


MODEL STMT 00026, 


DEPTH=002, 


VAL= 
LNTH= 


SYSNDX=0002, 


////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS). // 


. 





KWCNT=000 


0000000005 
004 


KWCNT=000 


oogo0000n0s 
005 


KWCNT=000 


0000000006 
005 


KWCNT=000 


0000000006 
006 


KWCNT=000 


0000000007 
006 


KWCNT=000 


0000000007 
007 


KWCNT=000 
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LOC OBJECT CODE  ADDR1 ADDR2 STMT SOURCE STATEMENT ASM H V 02 13.19 02/19/82 
//0000 LCLA CNT VAL= 0000000008 
7/0001 LCLC CMPADR LNTH= 007 
7} VAL=LISTLIN 
O0000A 4130 CO24 00026 58+ LA (3, LISTLINE COMPARAND 02-00028 
++//MHELP. BRANCH FROM STMT 00029 TO STMT 00038 IN MACRO SCHI 
O0000E 4111 0000 00000 ~3=—- 59+ LA —s-1,.0(1) LIST HEADER 02-00038 
000012 D202 C024 0000 00026 00000 ~=- 6 0+ MVC _LISTLINE,O(0) DUMMY MOVE TO GET COMP LENGTH 02-00039 
000018 00012.~—s6 1+ ORG *+-6 CHANGE MVC TO MVI 02-00040 
000012 92 62+ DC —- X'g2! MVI OPCODE 0602-00041 
000013 00014 63+ ORG  *+4 PRESERVE LENGTH AS IMMED OPND 02-00042 
000014 DOOO 64+ DC x'pooo! RESULT IS MVI 0(13),L 02-00043 
000016 58FO CO2E 00030 65+ L 15,=V(SCHI ) 02-00044 
00001A OSEF 66+ BALR 14,15 02-00045 
00001C 981F DOOY 00004 = 67+ LM 1,15,4(13) 02-00046 
//MHELP EXIT FROM. SCHI . MODEL STMT 00047, DEPTH=002, SYSNDX=0002, KWCNT=000 
////SET SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS) .// 
7/0000 LCLA CNT VAL= 0000000008 
7/0001 LCLC CMPADR LNTH= 007 
i, VAL=LISTLIN 
000020 4710 CO00 00002 ~—s«6 + BC 1,A0001 IF MAX REACHED, CONTINUE 01-00012 
//MHELP EXIT FROM LNSRCH . MODEL STMT 00013, DEPTH=001, SYSNDX=0001, KWCNT=001 
7///SE1 SYMBOLS (SKIPPED NUMBERS MAY BE SEQUENCE SYMBOLS) .// 
7/0000 LCLC LABEL LNTH= 005 
// VAL=A0001 
000024 69 LISTNEXT DS. sH 09600000 
000026 70 LISTLINE DS FL3'0! 09650000 
000030 71 LTORG 09700000 
000030 00000000 72 =V(SCHI) 
000000 73 END TEST 09750000 











ESD Card Format 


° Appendix C. Object Deck Output 


Columns Contents 


1 

2-4 
5-10 
11-12 


13-14 
15-16 
17-64 


65-72 
73-80 


X’02’ 
ESD 
Blank 


Variable field count—number of bytes of information in variable field 
(columns 17-64) 


Blank 
ESDID of first SD, XD, CM, PC, ER, or WX in variable field 
Variable field. One to three 16-byte items of the following format: 


8 bytes—Name 
1 byte —ESD type code; the hexadecimal value is: 
00 SD 
01 LD 
02 ER 
04 PC 
05 CM 
O06 XD(PR) 
OA WX 
3 bytes—Address 
1 byte 
—Alignment if XD 
—Blank if LD, ER, or WX 
—AMODE/RMODE flags if SD, PC, or CM 
Bit 5:0 = RMODE is 24 
1 = RMODE is ANY 
Bits 6-7: 00 = AMODE is 24 


01 = AMODE is 24 
10 = AMODE is 31 
11 = AMODE is ANY 


3 bytes—Length, LDID, or blank 
Blank 


Deck ID and/or sequence number. The deck ID is the name from the 
first TITLE statement that has a nonblank name field. This name can 
be 1 to 8 characters long. If the name is fewer than 8 characters long 
or if there is no name, the remaining columns contain a card 
sequence number. (Columns 73-80 of cards produced by PUNCH or 
REPRO statements do not contain a deck ID or a Sequence number.) 


Appendix C. Object Deck Output 105 


TEXT (TXT) Card Format 


Columns Contents 


1 
2-4 


6-8 
9-10 
11-12 
13-14 
15-16 
17-72 
73-80 


RLD Card Format 
Columns 
1 
2-4 
5-10 
11-12 


13-16 
17-72 


73-80 


X’02’ 

TXT 

Blank 

Relative address of first instruction on card 

Blank 

Byte count—number of bytes in information field (columns 17-72) 
Blank 

ESDID 

56-byte information field 


Deck ID and/or sequence number. The deck ID is the name from the 
first TITLE statement that has a nonblank name field. The name can 
be 1 to 8 characters long. If the name is fewer than 8 characters long 
or if there is no name, the remaining columns contain a card 
sequence number. (Columns 73-80 of cards produced by PUNCH or 
REPRO statements do not contain a deck ID or a sequence number.) 


Contents 
X’02’ 
RLD 
Blank 


Data field count—number of bytes of information in data field (columns 
17-72) 


Blank 
Data field: 


17-18 Relocation ESDID 

19-20 Position ESDID 

21 Flag byte 

22-24 Absolute address to be relocated 
25-72 Remaining RLD entries 


Deck ID and/or sequence number. The deck ID is the name from the 
first TITLE statement that has a nonblank name field. The name can 
be 1 to 8 characters long or if there is no name, the remaining 
columns contain a card sequence number. (Columns 73-80 of cards 
produced by PUNCH or REPRO statements do not contain a deck ID 
or a sequence number.) 
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If the rightmost bit of the flag byte is set, the following RLD entry has the same 
relocation ESDID and position ESDID, and this information will not be repeated: 
if the rightmost bit of the flag byte is not set, the next RLD entry has a different 
relocation ESDID and/or position ESDID, and both ESDIDs will be recorded. 


For example, if the RLD entries 1, 2, and 3 of the program listing contain the 
following information: 


Position Relocation 


Entry  ESDIO ESDID Flag Address 
] 02 04 0C 000100 
2 02 04 0C 000104 
3 03 01 0C 000800 


then columns 17-72 of the RLD card would be as follows: 


Entry 3 





END Card Format 


Columns Contents 


1 X’02’ 
2-4 END 
5 Blank 
6-8 Entry address from operand of END card in source deck (blank if no 
operand) 


9-14 Blank 
15-16 ESDID of entry point (blank if no operand) 
17-32 Blank 
33 Number of IDR items that follow (EBCDIC1 or EBCDIC2) 


34-52 Translator identification, version and release level (such as 0201), and 
date of the assembly (yydda) 


53-71 When present, they are the same format as columns 34-52 
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72-80 Deck ID and/or sequence number. The deck ID is the name from the 
first TITLE statement that has a nonblank name field. The name can 
be 1 to 8 characters long. If the name is fewer than 8 characters long 
or if there is no name, the remaining columns contain a card ww 
sequence number. (Columns 73-80 of cards produced by PUNCH or 
REPRO statements do not contain a deck ID or a Sequence number.) 


TESTRAN (SYM) Card Format 


If you request it, the assembler punches out symbolic information for TESTRAN 
concerning the assembled program. This output appears ahead of all loader 
text. The format of the card images for TESTRAN output follows: 


Columns Contents 


1 x 02’ 
2-4 SYM 
5-10 Blank 
11-12 Variable field—number of bytes of text in variable field (columns 
17-72) 


13-16 Blank 
17-72 Variable field (see below) 


73-80 Deck ID and/or sequence number. The deck ID is the name from the 
first TITLE statement that has a nonblank name field. The name can 
be 1 to 8 characters long. If the name is fewer than 8 characters long 
or if there is no name, the remaining columns contain a card 
sequence number. (Columns 73-80 of cards produced by PUNCH or 
REPRO statements do not contain a deck ID or a Sequence number.) 





The variable field (columns 17-72) contains up to 56 bytes of TESTRAN text. The 
items comprising the text are packed together; consequently, only the last card 
may contain less than 56 bytes of text in the variable field. The formats of a 
text card and an individual text item are shown in Figure 19 on page 110. The 
contents of the fields within an individual entry are as follows: 


1. Organization (1 byte) 


Bit 0: 0 = nondata type 
1 = data type 


Bits 1-3 (if nondata type): 
000 = space 
001 = control section 
010 = dummy control section 
011 = common 
100 instruction 
101 = CCW, CCWO, CCW1 
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Bit 1 (if data type): 
0 = no multiplicity 
1 = multiplicity (indicates presence of 
M field) 


Bit 2 (if data type): 
0 = independent (not a packed or zoned 
decimal constant) 
1 = cluster (packed or zoned decimal 
constant) 


Bit 3 (if data type): 
0 = no scaling 
1 = scaling (indicates presence of S 


field) 
Bit 4: 
QO = name present 
1 = name not present 
Bits 5-7: 


Length of name minus ‘1 
. Address (3 bytes)—displacement from base of control section 
. Symbol Name (0-8 bytes)—symbolic name of particular item 


Note: if the entry is nondata type and space, an extra byte Is present that 
contains the number of bytes that have been skipped. 


. Data Type (1 byte)—contents in hexadecimal 


OO = character 

04 = hexadecimal or pure DBCS (G-type) 
08 = binary 

10 = fixed point, full 

14 = fixed point, half 

18 = floating point, short 

shes floating point, long 

20 = A-type or Q-type data 
24 = Y-type data 

28 = S-type data 

2C = V-type data 

30 = packed decimal 

34 = zoned decimal 

38 = floating point, extended 


. Length (2 bytes for character, hexadecimal, decimal, or binary items; 1 byte 
for other types)—length of data item minus 1 


. Multiplicity —M field (3 bytes)—equals 1 if not present 


. scale —signed integer—S field (2 bytes)—present only for F-, H-, E-, D-, P-, 
and Z-type data, and only if scale is nonzero. 
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16.7 72 73 80 





TEST RAN text — packed entries zs & or ila 





Entry 
(complete or 
head portion) 


Entry N complete entries 
(complete or N > 1 
end portion) 


Variable size entries 


Data Symbol 
Address Symbol name ivpe one | a Scale pel 
1-2 3 


1 3 0-8 1 2 








Figure 19. TESTRAN SYM Card Format 
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Appendix D. Assembler H Messages 


Assembler H has two types of messages: 
Assembly error diagnostic messages and 
assembly abnormal termination messages. The 
following section describes both types and gives 
their format and placement. “Assembly Error 
Diagnostic Messages” on page 112 and 
“Abnormal Assembly Termination Messages’ on 
page 142 describe and list each type of 
message. 


Message Descriptions 


Each message entry in this book has five 
sections: 


e Message Number and Text 
e Explanation of Message 

« System Action 

e Programmer Response 

« Severity Code 


Message Number and Text 


Only the message number and the major fixed 
portion of the message text included in the 
message description. Any abbreviations in 
actual message text are spelled out in full in the 
book. Unused message numbers account for the 
gaps in the message number sequence. No 
messages are defined for numbers, such as 
IEVOO6, not included in this section. 


Explanation of Message 


There may be more than one explanation for 
some messages, because they are generated by 
different sections of the assembler. Several of 
the assembler termination messages have iden- 
tical explanations. 


system Action 


This section tells how the assembler handles 
Statements with errors. A machine instruction is 
assembled as all zeros. An assembler instruc- 
tion is usually ignored; it is printed but has no 
effect on the assembly. Many assembler 


instructions, however, are partially processed or 
processed with a default value. 


For some instructions, the operands preceding 
the operand in error or every operand except 
the operand in error is processed. For example, 
if one of several operands on a DROP statement 
is a symbol that has not been equated to a reg- 
ister number, only that operand is ignored. All 
the correctly specified registers are correctly 
processed. 


For some assembler statements, especially 
macro prototype and conditional assembly state- 
ments, the operand or term in error is given a 
default value. Thus the statement will assemble 
completely, but will probably cause incorrect 
results if the program is executed. 


Programmer Response 


Many errors have specific or probable causes. 
In such a case, the Programmer Response 
section gives specific steps for fixing the error. 
Most messages, however, have too many pos- 
sible causes (from keypunch error to wrong use 
of the statement) to list. The programmer 
response for these error messages does not 
give specific directions. The cause of most such 
errors can be determined from the message text 
and the explanation. 


severity Code 


The severity code indicates the seriousness of 
the error. The severity codes and their 
meanings are shown in the table at the end of 
this appendix. 


This code is the return code issued by the 
assembler when it returns control to the oper- 
ating system. The IBM-supplied cataloged pro- 
cedures include a COND parameter on the 
linkage edit and execution steps. The COND 
parameter prevents execution of these steps if 
the return code from the assembler is 8 or 
greater. Thus errors with ***ERROR*** in the 
message prevent the assembled program from 
linkage editing or executing. Errors with 
**WARNING** in the message do not. 
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Assembly Error Diagnostic 
Messages 


Assembler H prints most error messages in the 
listing immediately following the statements in 
error. |t also prints the total number of flagged 
statements and their line numbers in the Diag- 
nostic Cross Reference section at the end of the 
listing. 


The messages do not follow the statement in 
error when: 


e Errors are detected during editing of macro 
definitions read from a library. A message 
for such an error appears after the first call 
in the source program to that macro defi- 
nition. You can, however, bring the macro 
definition into the source program with a 
COPY statement. The editing error mes- 
sages will then be attached to the state- 
ments in error. 


e Errors are detected by the look-ahead func- 
tion of the assembler. (Look-ahead scans, 
for attribute references, statements after the 
one being assembled.) Messages for these 
errors appear after the statements in which 
they occur. The messages may also appear 
at the point at which look-ahead was called. 


¢ Errors are detected on conditional assembly 
statements during macro generation or 
MHELP testing. Such a message follows the 
most recently generated statement or 
MHELP output statement. 


A typical error diagnostic messsage Is: 


IEVO57 = ***ERROR*** UNDEFINED OPERATION 
CODE -xxxxx 


The term ***ERROR*** ts part of the message if 
the severity code is 8 or greater. The term 
“WARNING** is part of the message if the 
severity code is 0 or 4. 


A copy of a segment of the statement in error, 
represented above by xxxxx, is appended to the 
end of many messages. Normally this segment, 
which can be up to 16 bytes long, begins at the 
bad character or term. For some errors, 
however, the segment may begin after the bad 
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character or term. The segment may include 
part of the remarks field. 





If a diagnostic message follows a statement gen- 
erated by a macro definition, the following items 
may be appended to the error message: 


¢« The number of the model statement tn which 
the error occurred, or the first five charac- 
ters of the macro name. 


e The SET symbol, parameter number, or 
value string associated with the error. 


Note: References to macro parameters are by 
number (such as PARAMO08) instead of by 
name. The first seven numbers are always 
assigned for the standard system parameters as 
follows: 


PARAMOOO = &SYSNDX 

PARAMOO] = &SYSECT 

PARAMOO2 = &SYSLOC 

PARAMO03 = &SYSTIME 

PARAMO04 = &SYSDATE 

PARAMQ05 = &SYSPARM 

PARAMOO6 = Name Field Parameter 


Then the keyword parameters are numbered in 

the order defined in the macro definition, fol- ~~ 
lowed by positional parameters. When there are wl) 
no keyword parameters in the macro definition, 

PARAMO0O/ refers to the first positional param- 

eter. 


If a diagnostic message follows a conditional 
assembly statement in the source program, the 
following items will be appended to the error 
message: 


¢ The word “OPENC” 
« The SET symbol or value string associated 
with the error 


several messages may be issued for a single 
statement or even for a single error within a 
statement. This happens because each state- 
ment is usually evaluated on more than one 
level (for example, term level, expression level, 
and operand level) or by more than one phase of 
the assembler. Each level or phase can diag- 
nose errors; therefore, most or all of the errors 
in the statement are flagged. Occasionally, 
duplicate error messages may occur. This is a 
normal result of the error detection process. 





J 


Message Not Known 


The following message may appear in a listing: 


TEVnnn ***ERROR*** MESSAGE NOT 
KNOWN - XXX XXXXXXX 


The statement preceding this message contains 
an error but the assembler routine that detected 
the error issued the number (lEVnnn) of a nonex- 
istent error message to the assembler’s 
message generation routine. The segment of 
the statement in error may be appended to the 
message. If you can correct the error, this state- 
ment will assemble correctly. However, there is 
a bug in the error detection process of the 
assembler. Save the output and the source deck 
from this assembly and report the problem to 
your IBM customer engineer. 


Messages 


OPERATION-CODE NOT ALLOWED 
TO BE GENERATED 


IEVO01 


Explanation: An attempt was made to produce a 
restricted operation code by variable symbol 
substitution. Restricted operation codes are: 


ACTR AGO AGOB AREAD 
AIF AIFB ANOP SETA 

COPY REPRO ICTL SETB 

MACRO MEND MEXIT SETC 

GBLA GBLB GBLC 

LCLA LCLB LCLC 


System Action: The statement is ignored. 


Programmer Response: lf you want a variable 
operation code, use AIF to branch to the correct 
unrestricted statement. 


Severity: 8 


lIEVOO2 GENERATED STATEMENT TOO LONG. 


STATEMENT TRUNCATED 


Explanation: The statement generated by a 
macro definition is more than 864 characters 
long. 


System Action: The statement is truncated; the 
leading 864 characters are retained. 


Programmer Response: Shorten the statement. 


Severity: 12 


IEVO03 UNDECLARED VARIABLE SYMBOL. 


DEFAULT=0, NULL, OR TYPE=U 


Explanation: A variable symbol in the operand 
field of the statement has not been declared 
(defined) in the name field of a SET statement, in 
the operand field of an LCL or GBL statement, or 
in a macro prototype statement. 


System Action: The variable symbol is given a 
default value as follows: 


SETA = 0 
SETB = 0 
SETC = null (empty) string 


The type attribute (T') of the variable ts given a 
default value of U (undefined). 


Programmer Response: Declare the variable 
before you use it aS an operand. 


Severity: 8 


[EVO004 DUPLICATE SET SYMBOL DECLARA- 


TION. FIRST IS RETAINED 


Explanation: A SET symbol has been declared 
(defined) more than once. A SET symbol is 
declared when it is used in the name field of a 
SET statement, in the operand field of an LCL or 
GBL statement, or in a macro prototype state- 
ment. 


System Action: The value of the first declaration 
of the SET symbol is used. 


Programmer Response: Eliminate the incorrect 
declarations. 


Severity: 8 


lEVOOS NO CORE FOR INNER MACRO CALL. 


CONTINUE WITH OPEN CODE 


Explanation: An inner macro call could not be 
executed because no main storage was avail- 
able. 


System Action: The assembly ts continued with 
the next open code statement. 


Programmer Response: Check whether the 
macro is recursive, and, if so, whether termi- 
nation is provided for; correct the macro if nec- 
essary. If the macro Is correct, allocate more 
main storage. 


Severity: 12 
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1EV007 PREVIOUSLY DEFINED SEQUENCE 


SYMBOL 


Explanation: The sequence symbol in the name 
field has been used in the name field of a pre- 
vious statement. 


System Action: The first definition of the 
sequence symbol is used; this definition is 
ignored. 


Programmer Response: Remove or change one 
of the sequence symbols. 


Severity: 12 


PREVIOUSLY DEFINED SYMBOLIC 
PARAMETER 


IEVOO8 


Explanation: The same variable symbol has 
been used to define two different symbolic 
parameters. 


System Action: When the parameter name (the 
variable symbol) is used inside the macro defi- 
nition, it will refer to the first definition of the 
parameter in the prototype. However, if the 
second parameter defined by the variable 
symbol is a positional parameter, the count of 
positional operands will still be increased by 
one, The second parameter can then be 
referred to only through use of &SYSLIST. 


Programmer Response: Change one of the 
parameter names to another variable symbol. 


Severity: 12 


IEVOOS SYSTEM VARIABLE SYMBOL ILLE- 


GALLY RE-DEFINED 


Explanation: A system variable symbol has been 
used in the name field of a macro prototype 
statement. The system variable symbols are: 


&SYSECT &SYSDATE 
&SYSLIST GS¥SlOC 
&SYSNDX &SYSPARM 
&SYST IME 


System Action: The name parameter is ignored. 
The name on a corresponding macro instruction 
will not be generated. 


Programmer Response: Change the parameter 
to one that is not a system variable symbol. 
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Severity: 12 


lIEVO11 INCONSISTENT GLOBAL DECLARA- 


TIONS. FIRST iS RETAINED 


Explanation: A global SET variable symbol has 
been defined in more than one macro definition 
or in a macro definition and in the source 
program, and the two definitions are inconsistent 
in type or dimension. 


System Action: The first definition encountered 
is retained. 


Programmer Response: Assign a new SET 
symbol or make the definitions compatible. 


Severity: 8 


lIEVO12 UNDEFINED SEQUENCE SYMBOL. 


MACRO ABORTED 


Explanation: A sequence symbol in the operard 
field is not defined: that is, it is not used in the 
name field of a model statement. 


System Action: Exit from the macro definition. 


Programmer Response: Define the sequence 


symbol. 
Severity: 12 
IEVO13 ACTR COUNTER EXCEEDED 


Explanation: The conditional assembly loop 
counter (set by an ACTR statement) has been 
decremented to zero. The ACTR counter is dec- 
remented by one each time an AIF or AGO 
branch is executed successfully. The counter is 
halved for most errors encountered by the 
macro editor phase of the assembler. 


System Action: A macro expansion ts termi- 
nated. If the ACTR statement is in the source 
program, the assembly is terminated. 


Programmer Response: Check for an AIF/AGO 
loop or another type of error. (You can use the 
MHELP facility, described in Chapter 3 and 
Appendix B, to trace macro definition logic.) If 
there is no error, increase the initial count on 
the ACTR instruction. 


Severity: 12 











UNDEFINED KEYWORD PARAMETER. 
DEFAULT TO POSITIONAL 
INCLUDING KEYWORD 


IEV017 


Explanation: A keyword parameter in a macro 
call is not defined in the corresponding macro 
prototype statement. 


Note: This message may be generated by a 
valid positional parameter that contains an equal 
Sign. 


System Action: The keyword (including the 
equals sign and value) is used as a positional 
parameter. 


Programmer Response: Define the Keyword in 
the prototype statement. 


Severity: 4 


lIEVO18 DUPLICATE KEYWORD IN MACRO 


CALL. LAST VALUE IS USED 


Explanation: A keyword operand occurs more 
than once in a macro call. 


System Action: The latest value assigned to the 
keyword Is used. 


Programmer Response: Eliminate one of the 
Keyword operands. 


Severity: 12 


IEVO20 ILLEGAL GBL OR LCL STATEMENT 


Explanation: A global (GBL) or local (LCL) dec- 
laration statement does not have an operand. 


System Action: The statement is ignored. 


Programmer Response: Remove the statement 
or add an operand. 


Severity: 8 


lIEVO21 ILLEGAL SET STATEMENT 


Explanation: The operand of a SETB statement 
is not O, 1, or a SETB expression enclosed in 
parentheses. 


System Action: The statement is ignored. 


Programmer Response: Correct the operand or 
delete the statement. 


Severity: 8 


IEVO23 SYMBOLIC PARAMETER TOO LONG 


Explanation: A symbolic parameter in this state- 
ment is too long. It must not exceed 63 charac- 
ters, including the initial ampersand. 


System Action: The symbolic parameter and 
any operand following it in this statement are 
ignored. 


Programmer Response: Make sure all symbolic 
parameters consist of an ampersand followed by 
1 to 62 alphameric characters, the first of which 

iS alphabetic. 


Severity: 8 


IEVO24 INVALID VARIABLE SYMBOL 


Explanation: One of these errors has occurred: 


e A symbolic parameter or a SET symbol is 
not an ampersand followed by ‘1 to 62 alpha- 
meric characters, the first being alphabetic. 

° Acreated SET symbol definition is not a 
valid SET symbol expression enclosed in 
parentheses. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid symbol 
or expression. 


Severity: 8 


IEVO25 INVALID MACRO PROTOTYPE 


OPERAND 


Explanation: The format of the operand field of a 
macro prototype statement ts invalid. For 
example, two parameters are not separated by a 
comma, or a parameter contains an invalid char- 
acter. 


System Action: The operand field of the proto- 
type is ignored. 


Programmer Response: Supply a valid operand 
field. 


Severity: 12 
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MACRO CALL OPERAND TOO LONG. 
255 LEADING CHARACTERS DELETED 


IEVO26 


Explanation: An operand of a macro instruction 
is more than 255 characters long. 


System Action: The leading 255 characters are 
deleted. 


Programmer Response: Limit the operand to 255 
characters, or limit it into two or more operands. 


Severity: 12 


IEVO27 EXCESSIVE NUMBER OF OPERANDS 


Explanation: One of the following has occurred: 


« More than 240 positional and/or keyword 
operands have been explicitly defined in a 
macro prototype statement. 

e There are more than 255 operands in a DC, 
DS, or DXD statement. 


System Action: The excess parameters are 
ignored. 


Programmer Response: For a DC, DS, or DXD 
statement, use more than one statement. Fora 
macro prototype statement, delete the extra 
operands and use &SYSLIST to access the posi- 
tional operands, or redesign the macro defi- 
nition. 


Severity: 12 


lIEVO28 INVALID DISPLACEMENT 


Explanation: One of the following has occurred: 


« The displacement field of an explicit address 
is not an absolute value within the range 0 
through 4095. 

« The displacement field of an S-type address 
constant is not an absolute value within the 
range 0 through 4095. 


System Action: The statement or constant is 
assembled as zero. 


Programmer Response: Correct the displace- 
ment or supply an appropriate USING statement 
containing an absolute first operand prior to this 
statement. 


Severity: 8 
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INCORRECT REGISTER OR MASK 
SPECIFICATION 


IEVO29 


Explanation: The value specifying a register or a 
mask is not an absolute value within the range 0 
through 15; an odd register is used where an 
even register is required; a register is used 
where none can be specified; or a register is not 
specified where one is required. 


System Action: For machine instructions and 
S-type address constants, the statement or con- 
stant is assembled as zero. For USING and 
DROP statements, the invalid register operand is 
ignored. 


Programmer Response: Specify a valid register. 


Severity: 8 


IEVO30 INVALID LITERAL USAGE 


Explanation: A literal is used in an assembler 
instruction, another literal, or a field of a 
machine instruction where it is not permitted. 


System Action: An assembler instruction con- 
taining a literal is generally ignored and another 
message, relative to the operation code of the 
instruction, appears. A machine instruction Is 
assembled to zero. 


Programmer Response: If applicable, replace 
the literal with the name of a DC statement. 


Severity: 8 


lIEVO31 INVALID IMMEDIATE FIELD 


Explanation: The value of an immediate operand 
of a machine Instruction requires more than one 
byte of storage (exceeds 255) or the value of the 
immediate operand exceeds 9 on an SRP 
instruction. 


System Action: The instruction is assembled as 
zero. 


Programmer Response: Use a valid immediate 
operand, or specify the immediate information in 
a DC statement or a literal and change the state- 
ment to a nonimmediate type. 


Severity: 8 











IEVO32 RELOCATABLE VALUE FOUND 


WHERE ABSOLUTE VALUE REQUIRED 


Explanation: A relocatable or complex relocat- 
able expression is used where an absolute 
expression is required. 


System Action: A machine instruction is assem- 
bled as zero. In a DC, DS, or DXD statement, 
the operand in error and the following operands 
are ignored. 


Programmer Response: Supply an absolute 
expression or term. 


Severity: 8 


IEVO033 ALIGNMENT ERROR 


Explanation: An address referenced by this 
Statement may not be aligned to the proper 
boundary for this instruction; for example, the 
data referenced by a load instruction (L) may be 
on a halfword boundary, or the address may 
depend upon an index register. 


System Action: The instruction is assembled as 
written. 


Programmer Response: Correct the operand if it 
is in error. If you are using a System/370 model 
that does not require alignment or you wish to 
Suppress alignment checking for some other 
reason, you can specify ‘NOALIGN’ as an assem- 
bler option. If a particular statement is correct, 
you can suppress this message by writing the 
statement with an absolute displacement and an 
explicit base register, as in this example: 


L  1,SYM-BASE(,2) 


Severity: 4 


IEVO34 ADDRESSABILITY ERROR 


Explanation: The address referenced by this 
Statement does not fall within the range of a 
USING statement, or a base register is specified 
along with a relocatable displacement. 


System Action: The instruction is assembled as 
zero. 


Programmer Response: Insert the appropriate 
USING statement prior to this statement. Other- 
wise, check this statement for a misspelled 
symbol, an unintended term or symbol in an 
address expression, or a relocatable symbol! 
used as a displacement. 


Severity: 8 


IEVO35 INVALID DELIMITER 


Explanation: 


1. A required delimiter in a DC, DS, or DXD 
statement is missing or appears where none 
should be; the error may be any of these: 


e A quotation mark with an address con- 
Stant. 

e A left parenthesis with a nonaddress 
constant. 

e A constant field not started with a quota- 
tlon mark, left parenthesis, blank, or 
comma. 

e An empty constant field in a DC. 

e A missing comma or right parenthesis 
following an address constant. 

« A missing subfield right parenthesis in 
an S-type address constant. 

e A missing right parenthesis in a constant 
modifier expression. 


2. A parameter in a macro prototype statement 
was not followed by a valid delimiter: 
comma, equal sign, or blank. 


3. The DBCS option is on, and SO follows a 
variable symbol without an intervening 
period. 


System Action: The operand or parameter in 
error and the following operands or parameters 
are ignored. 


Programmer Response: Supply a valid delimiter. 


Severity: 12 


IEVO36 REENTRANT CHECK FAILED 


Explanation: A machine instruction that might 
store data into a control section or common area 
when executed has been detected. This 
message is generated only when reentrant 
checking is requested by the assembler option 
‘RENT’. 


System Action: The statement is assembled as 
written. 


Programmer Response: lf you want reentrant 
code, correct the instruction. Otherwise, you 
can suppress reentrant checking by specifying 
‘NORENT’ as an assembler option. 


Severity: 4 
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IEV037 ILLEGAL SELF-DEFINING VALUE 


Explanation: A decimal, binary (B), hexadecimal 
(X), or character (C) self-defining term contains 
invalid characters or is in illegal format. 


System Action: In the source program, the 
operand in error and the following operands are 
ignored. In a macro definition, the entire state- 
ment is ignored. 


Programmer Response: Supply a valid self- 
defining term. 


Severity: 8 


JEVO038 OPERAND VALUE FALLS OUTSIDE 


OF CURRENT SECTION/LOCTR 


Explanation: An ORG statement specifies a 
location outside the control section or the 
LOCTR in which the ORG is used. Note that 
ORG cannot force a change to another section 
or LOCTR: 


System Action: The statement is ignored. 


Programmer Response: Change the ORG state- 
ment if it is wrong. Otherwise, insert a CSECT, 
DSECT, COM, or LOCTR statement to set the 
location counter to the proper section before the 
ORG statement is executed. 


Severity: 12 


IEVO39 LOCATION COUNTER ERROR 


Explanation: The location counter has exceeded 
2°74 the largest address that can be contained 
in 3 bytes. This occurrence is called location 
counter wraparound. 


System Action: The location counter is 4 bytes 
long (only 3 bytes appear in the listing and the 
Object deck). The overflow is carried into the 
high-order byte and the assembly continues. 
However, the resulting code will probably not 
execute correctly. 


Programmer Response: The probable cause is a 
high ORG statement value or a high START 
Statement value. Correct the value or split up 
the control section. 
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Severity: 12 


IEV040 MISSING OPERAND 


Explanation: The statement requires an 
operand, and none is present. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
ignored. 


Programmer Response: Supply the missing 
operand. 


Severity: 12 


TERM EXPECTED. TEXT IS UNCLASS- 
IFIABLE 


IEVO41 


Explanation: One of these errors has occurred: 


« A term was expected, but the character 
encountered is not one that starts a term 
(letter, number, =, +, -, ’*). 

° A letter and a quotation mark did not intro- 
duce a valid term: the letter is not L, C, G 
(DBCS option only), X, or B. 


System Action: Another message will accom- 
pany an assembler statement. A machine 
instruction will be assembled as zero. 


Programmer Response: Check for missing punc- 
tuation, a wrong letter on a self-defining term, a 
bad attribute request, a leading comma, ora 
dangling comma. Note that the length attribute 
is the only one accepted here. If a scale, type, 
or integer attribute is needed, use a SETA state- 
ment and substitute the variable symbol where 
the attribute is needed. 


Severity: 8 


LENGTH ATTRIBUTE OF UNDEFINED 
SYMBOL. DEFAULT =1 


IEVO42 


Explanation: This statement has a length attri- 
bute reference to an undefined symbol. 


System Action: The L' attribute defaults to 1. 


Programmer Response: Define the symbol that 
was referenced. 


Severity: 8 











IEV043 PREVIOUSLY DEFINED SYMBOL 


Explanation: The symbol in a name field or in 
the operand field of an EXTRN or WXTRN State- 
ment was defined (used as a name or an 
EXTRN/WATRN operand) in a previous state- 
ment. 


System Action: The name or EXTRN/WXTRN 
operand of this statement is ignored. The fol- 
lowing Operands of an EXTRN or WXTRN will be 
processed. The first occurrence of the symbol 
will define it. 


Programmer Response: Correct a possible 
Spelling error, or change the symbol. 


Severity: 8 


IEVO044 UNDEFINED SYMBOL 


Explanation: A symbol in the operand field has 
not been defined, that is, used in the name field 
of another statement or the operand field of an 
EXTRN or WXTRN. 


System Action: A machine instruction or an 
address constant is assembled as zero. In a DC, 
DS, or DXD statement or in a duplication-factor 
or length-modifier expression, the operand in 
error and the following operands are ignored. In 
an EQU statement, zero is assigned as the value 
of the undefined symbol. Any other instruction is 
ignored entirely. 


Programmer Response: Define the symbol, or 
remove the references to it. 


Severity: 8 


IEVO45 REGISTER NOT PREVIOUSLY USED 


Explanation: A register specified in a DROP 
Statement has not been previously specified in a 
USING statement. 


System Action: Registers not currently active 
are ignored. 


Programmer Response: Remove the unrefer- 
enced registers from the DROP statement. You 
can drop all active base registers at once by 
specifying DROP with a blank operand. 


Severity: 4 


BIT 7 OF CCW FLAG BYTE MUST BE 
ZERO 


IEVO46 


Explanation: Bit 7 of the flag byte of a channel 
command word specified by a CCW, CCWO, or 
CCW1 statement is not zero. 


System Action: The CCW, CCWO, or CCW1 is 
assembled as zero. 


Programmer Response: Set bit 7 of the flag byte 
to zero to Suppress this message during the next 
assembly. 


Severity: 8 


IEV047 SEVERITY CODE TOO LARGE 


Explanation: The severity code (first operand) of 
an MNOTE statement is not * or an unsigned 
decimal number from 0 to 255. 


System Action: The statement is printed in 
Standard format instead of MNOTE format. The 
MNOTE is given the severity code of this 
message. 


Programmer Response: Choose a severity code 
of * or a number less than 255, or check for a 
generated severity code. 


Severity: 8 


lIEVO48 ENTRY ERROR 


Explanation: One of the following errors was 
detected in the operand of an ENTRY statement: 


e Duplicate symbol (previous ENTRY) 

e Symbol defined in a DSECT or COM section 

e Symbol defined by a DXD statement 

e Undefined symbol 

e Symbol defined by an absolute or complex 
relocatable EQU statement 


System Action: The external symbol dictionary 
output is Suppressed for the symbol. 


Programmer Response: Define the ENTRY 
operand correctly. 


Severity: 8 
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lIEVO49 ILLEGAL RANGE ON ISEQ 


Explanation: If this message is accompanied by 
another, this one is advisory. If it appears by 
itself, it indicates one of the following errors: 


e An operand value is less than 1 or greater 
than 80, or the second operand (rightmost 
column to be checked) is less than the first 
operand (leftmost column to be checkedq). 

« More or fewer than two operands are 
present, or an operand is null (empty). 

« An operand expression conlains an unde- 
fined symbol. 

« An operand expression is not absolute. 

e The statement is too complex. For example, 
it may have forward references or cause an 
arithmetic overflow during evaluation. 

« The statement is circularly defined. 


System Action: Sequence checking is stopped. 


Programmer Response: Supply valid ISEQ oper- 
ands. Also, be sure that the cards following this 
statement are in order; they have not been 
sequence checked. 


Severity: 4 


IEVO50 
CARDED 


Explanation: One of these errors has occurred: 


e The name field of a macro prototype state- 
ment contains an invalid symbolic parameter 
(variable symbol). 

« The name field of a COPY statement in a 
macro definition contains an entry other than 
blank or a valid sequence symbol. 


System Action: The invalid name field is 
ignored. 


Programmer Response: Correct the invalid 
name field. 


Severity: 8 


lIEVO51 ILLEGAL STATEMENT OUTSIDE A 


MACRO DEFINITION 


Explanation: A MEND, MEXIT, or AREAD state- 
ment appears outside a macro definition. 


System Action: The statement is ignored. 


Programmer Response: Remove the statement 
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ILLEGAL NAME FIELD. NAME DIS- 


or, if a macro definition is intended, insert a 
MACRO statement. 


Severity: 8 


IEVO52 CARD OUT OF SEQUENCE 


Explanation: Input sequence checking, under 
control of the ISEQ assembler instruction, has 
determined that this statement is out of 
sequence. The sequence number of the state- 
ment is appended to the message. 


System Action: The statement is assembled 
normally. However, the sequence number of the 
next statement will be checked relative to this 
Statement. 


Programmer Response: Put the statements in 
proper sequence. If you want a break tn 
sequence, put in a new ISEQ statement and 
sequence number. ISEQ always resets the 
sequence number; the card following the ISEQ is 
not sequence checked. 


Severity: 12 


IEVO53 BLANK SEQUENCE FIELD 


Explanation: Input sequence checking, con- 
trolled by the ISEQ assembler statement, has 
detected a statement with a blank sequence 
field. The sequence number of the last num- 
bered statement is appended to the message. 


System Action: The statement is assembled 
normally. The sequence number of the next 
statement will be checked relative to the last 
statement having a nonblank sequence field. 


Programmer Response: Put the proper 
sequence number in the statement or discon- 
tinue sequence checking over the blank state- 
ments by means of an ISEQ statement with a 
blank operand. 


Severity: 4 


IEVO54 ILLEGAL CONTINUATION CARD 


Explanation: A statement has more than 10 
cards or end-of-input has been encountered 
when a continuation card was expected. 


System Action: The cards already read are 
processed as is. If the statement had more than 
10 cards, the next card Is treated as the begin- 
ning of a new statement. 








Programmer Response: In the first case, break 
the statement into two or more statements. In 
the second case, ensure that a continued state- 
ment does not span the end of a library member. 
Check for lost cards or an extraneous continua- 
tion punch. 


Severity: 8 


IEVO55 RECURSIVE COPY 


Explanation: A nested COPY statement (COPY 
within another COPY) attempted to copy a library 
member already being copied by a higher level 
COPY within the same nest. 


System Action: This COPY statement is ignored. 


Programmer Response: Correct the operand of 
this COPY if it is wrong, or rearrange the nest so 
that the same library member is not copied by 
COPY statements at two different levels. 


Severity: 12 


IEVO57 UNDEFINED OPERATION CODE 


Explanation: One of the following errors has 
occurred: 


e The operation code of this statement is not a 
valid machine or assembler instruction or 
macro name. 

e In an OPSYN statement, this operand symbol 
is undefined or illegal or, if no operand is 
present, the name field symbol is undefined. 


System Action: The statement is ignored. Note 
that OPSYN does not search the macro library 
for an undefined operand. 


Programmer Response: Correct the statement. 
In the case of an undefined macro instruction, 
the wrong data set may have been specified for 
the macro library. In the case of OPSYN, a pre- 
vious OPSYN or macro definition may have 
failed to define the operation code. 


Severity: 8 


lIEVOS9 ILLEGAL ICTL 


Explanation: An ICTL statement has one of the 
following errors: 


e The operation code was created by variable 
symbol! substitution. 

e |t is not the first statement in the assembly. 

e The value of One or more operands is incor- 
rect. 

e An operand is missing. 

e An invalid character is detected in the 
operand field. 


System Action: The ICTL statement is ignored. 
Assembly continues with standard ICTL values. 


Programmer Response: Correct or remove the 
ICTL. The begin column must be 1-40; the end 
column must be 41-80 and at least five greater 
than the begin column; and the continue column 
must be 2-40. 


Severity: 16 


IEVO60 COPY CODE NOT FOUND 


Explanation: (1) If this message is on a COPY 
Statement and no text is printed with it, one of 
the following occurred: 


e The library member was not found. 


e The look-ahead phase previously processed 
the COPY statement and did not find the 
library member, the copy was recursive, or 
the operand contains a variable symbol. 


(2) If this message is not on a COPY statement, 
but has a library member name printed with it, 
the look-ahead phase of the assembler could not 
find the library member because the name is 
undefined or contains a variable symbol. 


System Action: The COPY statement is ignored; 
the library member is not copied. 


Programmer Response: Check that the correct 
macro library was assigned, or check for a pos- 
sible misspelled library member name. Ifthe 
library member may be read by the look-ahead 
phase of the assembler, do not make the library 
member name a variable symbol. 


lf COPY member is not defined in any macro 
library, and is not executed because of an AGO 
or AIF assembler instruction, add a dummy 
COPY member with the name to the macro 
library. 
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Severity: 12 


SYMBOL NOT NAME OF DSECT OR 
DXD 


IEVO61 


Explanation: The operand of a Q-type address 
constant is not a symbol or the name of a 
DSECT or DXD statement. 


System Action: The constant is assembled as 
zero. 


Programmer Response: Supply a valid operand. 


Severity: 8 


IEVO62 ILLEGAL OPERAND FORMAT 


Explanation: One of the following errors has 
occurred: 


e DROP or USING—more than 16 registers 
were specified in the operand field. 

e PUSH or POP—an operand does not specify 
a PRINT or USING statement. 

e PRINT~—an operand specifies an invalid print 
option. 

« MNOTE—the syntax of the severity code (first 
Operand) is invalid. 

e AMODE—the operand does not specify 24, 
31, or ANY. 

e RMODE—the operand does not specify 24 or 
ANY. 

e TIlTLE—more than 100 bytes were specified. 


System Action: The first 16 registers in a DROP 
or USING statement are processed. The 
operand in error and the following operands of a 
PUSH, POP, or PRINT statement are ignored. 
The AMODE or RMODE instruction is ignored, 
and the name field (if any) will not appear in the 
cross-reference listing. 


Programmer Response: Supply a valid operand 
field. 


Severity: 8 


IEVO63 NO ENDING APOSTROPHE 


Explanation: The quotation mark terminating an 
operand is missing, or the standard value of a 
keyword parameter of a macro prototype state- 
ment is missing. 


System Action: The operand or standard value 
in error is ignored. If the error is in a macro 
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definition model statement, the entire statement 
is ignored. 


Programmer Response: Supply the missing quo- 
tation mark. 


Severity: 8 


FLOATING POINT CHARACTERISTIC 
OUT OF RANGE 


lIEVO64 


Explanation: A converted floating-point constant 
is too large or too small for the processor. The 
allowable range is 7.2x10’° to 5.3x10-77. 


System Action: The constant is assembled as 
zero. 


Programmer Response: Check the characteristic 
(exponent), exponent modifier, scale modifier, 
and mantissa (fraction) for validity. Remember 
that a floating-point constant is rounded, not 
truncated, after conversion. 


Severity: 12 


IEVO65 UNKNOWN TYPE 


Explanation: An unknown constant type has 
been used in a DC or DS statement or ina 
literal. 


System Action: The operand in error and the fol- 
lowing operands are ignored. 


Programmer Response: Supply a valid constant. 
Look for an incorrect type code or incorrect 
syntax in the duplication factor. 


Severity: 8 


lIEVO66 RELOCATABLE Y-TYPE CONSTANT 


Explanation: This statement contains a relocat- 
able Y-type address constant. A Y-constant is 
only 2 bytes long, so addressing errors will 
occur if this program is loaded at a main storage 
address greater than 32K (32,768). 


System Action: The statement is assembled as 
written. 


Programmer Response: If this program will not 
be loaded at a main storage address greater 
than 32K, you can leave the Y-constant. 


Severity: 4 








IEVO67 ILLEGAL DUPLICATION FACTOR 


Explanation: One of the following errors has 
occurred: 


e A literal has a zero duplication factor. 

* The duplication factor of a constant is 
greater than 277-1. 

e A duplication factor expression of a constant 
is invalid. 


System Action: The operand in error and the fol- 
lowing Operands of a DC, DS, or DXD statement 
are ignored. The statement containing the literal 
is assembled as zero. 


Programmer Response: Supply a valid dupli- 
cation factor. If you want a zero duplication 
factor, write the literal as a DC statement. 


Severity: 12 


IEV068 LENGTH ERROR 


Explanation: One of the following errors has 
occurred: 


e The length modifier of a constant is wrong. 

e The C, X, B, Z, or P-type constant Is too long. 

° An operand is longer than 277-1 bytes. 

e A relocatable address constant has an illegal 
length. 

e The length field in a machine instruction is 
invalid or out of the permissible range. 


System Action: The operand in error and the fol- 
lowing operands of the DC, DS, or DXD state- 
ment are ignored, except that an address 
constant with an illegal length is truncated. A 
machine instruction is assembled as zero. 


Programmer Response: Supply a valid length. 


Severity: 12 


IEVO70 SCALE MODIFIER ERROR 


Explanation: A scale modifier in a constant is 
used illegally, is out of range, or is relocatable, 
or there is an error in a scale modifier 
expression. 


System Action: If the scale modifier is out of 
range, it defaults to zero. Otherwise, the 
operand in error and the following operands are 
ignored. 


Programmer Response: Supply a valid scale 
modifier. 


Severity: 8 


lIEVO71 EXPONENT MODIFIER ERROR 


Explanation: The constant contains multiple 
internal exponents, the exponent modifier is out 
of range or relocatable, or the sum of the expo- 
nent modifier is out of range. 


System Action: If the constant contains multiple 
internal exponents, the operand in error and the 
following operands are ignored. Otherwise, the 
exponent modifier defaults to zero. 


Programmer Response: Change the exponent 
modifier or the internal exponent. 


Severity: 8 


lIEVO72 DATA ITEM TOO LARGE 


Explanation: A Y-type address constant is larger 
than 2!°-1 or smaller than -2'°, or the value of a 
decimal constant is greater than the number of 
bits (integer attribute) allocated to it. 


System Action: The constant is truncated. The 
high-order bits are lost. 


Programmer Response: Supply a smaller scale 
modifier or a longer constant. 


Severity: 8 


lIEVO73 PRECISION LOST 


Explanation: The scale modifier of a floating- 
point number was large enough to shift the 
entire fraction out of the converted constant. 


System Action: The constant is assembled with 
an exponent but with a zero mantissa (fraction). 


Programmer Response: Change the scale modi- 
fier or use a longer constant. For example, use 
a D-type constant instead of an E-type constant. 


Severity: 8 


IEVO74 ILLEGAL SYNTAX IN EXPRESSION 


Explanation: An expression has two terms or 
two operations in succession, or invalid or 
missing characters or delimiters. 


System Action: In a DC, DS, or DXD statement, 
the operand in error and the following operands 
are ignored. In a macro definition, the entire 
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Statement is ignored. A machine instruction is 
assembled as zero. 


Programmer Response: Check the expression 
for keypunch errors, or for missing or invalid 
terms or characters. 


Severity: 8 


IEVO75 ARITHMETIC OVERFLOW 


Explanation: The intermediate or final value of 
an expression is not within the range -2?? 
through 2°!-1. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
ignored. 


Programmer Response: Change the expression. 


Severity: 8 


IEVO76 STATEMENT COMPLEXITY EXCEEDED 


Explanation: The complexity of this statement 
caused the assembler’s expression evaluation 
work area to overflow. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
ignored. 


Programmer Response: Reduce the number of 
terms, levels of expressions, or references to 
complex relocatable EQU names. 


Severity: 8 


lIEVO77 CIRCULAR DEFINITION 


Explanation: The value of a symbol in an 
expression is dependent on itself, either directly 
or indirectly, via one or more EQU statements. 
For example, 

A EQU 8B 


B: -EQU: 2C 
C EQU A 


A is circularly defined. 


System Action: The value of the EQU statement 
defaults to the current value of the location 
counter. All other EQU statements involved in 
the circularity are defaulted tn terms of this one. 


Programmer Response: Supply a correct defi- 
nition. 


Severity: 8 
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lIEVO79 ILLEGAL PUSH-POP 


Explanation: More POP assembler instructions 
than PUSH instructions have been encountered. 


System Action: This POP instruction is ignored. 


Programmer Response: Eliminate a POP State- 
ment, or add another PUSH statement. 


Severity: 8 


lIEVO80 STATEMENT IS UNRESOLVABLE 


Explanation: A statement cannot be resolved, 
because it contains a complex relocatable 
expression or because the location counter has 
been circularly defined. 


System Action: The statement is ignored. 


Programmer Response: Untangle the forward 
references or check the complex relocatable 
EQU statements. 


Severity: 8 


lIEVO81 CREATED SET SYMBOL EXCEEDS 63 
CHARACTERS 


Explanation: A SET symbol created by variable 
symbol substitution is longer than 63 characters 
(including the ampersand as the first character). 


System Action: If the symbol is in the operand 
field of a SET, AIF, or AGO statement, its value is 
set to zero or null, and the type attribute is set to 
undefined (U). If the symbol is in the operand 
field of a GBL, or LCL statement or the name 
field of a SET statement, the macro is aborted. 


Programmer Response: Shorten the symbol. 


Severity: 8 


IEVO82 CREATED SET SYMBOL IS NULL 


Explanation: A SET symbol created by variable 
symbol substitution is null (empty string). 


System Action: If the symbol is in the operand 
field of a SET, AIF, or AGO statement, its value Is 
set to zero or null, and the type attribute is set to 
undefined (U). If the symbol is in the operand 
field of a GBL, or LCL statement or the name 
field of a SET statement, the macro Is aborted. 


Programmer Response: Supply a valid symbol. 


Severity: 8 











) 


CREATED SET SYMBOL IS NOTA 
VALID SYMBOL 


IEVO83 


Explanation: A SET symbol created by variable 
symbol substitution or concatenation does not 
consist of an ampersand followed by up to 62 
alphameric characters, the first of which is 
alphabetic. 


System Action: If the symbol is in the operand 
field of a SET, AIF, or AGO statement, its value is 
set to zero or null, and the type attribute is set to 
undefined (U). If the symbol is in the operand 
field of a GBL or LCL statement or the name 
field of a SET statement, the macro is aborted. 


Programmer Response: Supply a valid symbol. 


Severity: 8 


GENERATED NAME FIELD EXCEEDS 
63 CHARACTERS. DISCARDED 


IEVO84 


Explanation: The name field on a generated 
statement is longer than 63 characters. 


System Action: The name field is not generated. 
The rest of the statement is assembled normally. 


Programmer Response: Shorten the generated 
name to 63 characters or fewer. 


Severity: 12 


GENERATED OPERAND FIELD IS 
NULL 


IEVO85 


Explanation: The operand field of a generated 
statement is null (empty). 


System Action: The statement is assembled as 
though no operand were specified. 


Programmer Response: Provide a nonempty 
operand field. If you want the statement assem- 
bled with no operand, substitute a comma rather 
than leave the operand blank. 


Severity: 0 


IEVO86 MISSING MEND GENERATED 


Explanation: A macro definition, appearing in 
the source program or being read from a library 
by a macro call or a COPY statement, ends 
before a MEND statement is encountered to ter- 
minate it. 


System Action: A MEND statement is generated. 


The portion of the macro definition read in will 
be processed. 


Programmer Response: Insert the MEND state- 
ment if it was left out. Otherwise, check if all the 
macro definition is on the library. 


Severity: 12 


GENERATED OPERATION CODE IS 
NULL 


1EV087 


Explanation: The operation code of a generated 
statement is null (blank). 


System Action: The generated statement is 
printed but not assembled. 


Programmer Response: Provide a valid opera- 


tion code. 
Severity: 12 
IEVO88 UNBALANCED PARENTHESES IN 


MACRO CALL OPERAND 


Explanation: Excess left or right parentheses 
occur in an operand (parameter) of a macro call 
Statement. 


System Action: The parameter corresponding to 
the operand in error is given a null (empty) 
value. 


Programmer Response: Balance the paren- 
theses. 


Severity: 8 


lIEVO8S ARITHMETIC EXPRESSION CON- 


TAINS ILLEGAL DELIMITER OR ENDS 
PREMATURELY 


Explanation: An arithmetic expression contains 
an invalid character or an arithmetic subscript 
ends without sufficient right parentheses. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid 
expression. 


Severity: 8 
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lIEVOSO EXCESS RIGHT PARENTHESIS IN 


MACRO CALL OPERAND 


Explanation: A right parenthesis without a corre- 
sponding left parenthesis was detected in an 
operand of a macro instruction. 


System Action: The excess right parenthesis is 
ignored. The macro expansion may be incor- 
rect. 


Programmer Response: Insert the proper paren- 
thesis. 


Severity: 8 


SETC OR CHARACTER RELATIONAL 
OPERAND OVER 255 CHARACTERS. 
TRUNCATED TO 255 CHARACTERS 


lIEVOS1 


Explanation: The value of the operand of a SETC 
Statement or the character relational operand of 
an AIF statement is longer than 255 characters. 

This may occur before substrings are evaluated. 


System Action: The first 255 characters are 
used. 


Programmer Response: Shorten the SETC 
expression value or the operand value. 


Severity: 8 


SUBSTRING EXPRESSION 1 POINTS 
PAST STRING END DEFAULT=NULL 


lIEVO92 


Explanation: The first arithmetic expression of a 
SETC substring points beyond the end of the 
expression character string. 


System Action: The substring is given a null 
value. 


Programmer Response: Supply a valid 
exoression. 


Severity: 8 


SUBSTRING EXPRESSION 71 LESS 
THAN 1. DEFAULT=NULL 


IEVO93 


Explanation: The first arithmetic expression of a 
SETC substring is less than one; that is, it points 
before the expression character string. 


System Action: The substring expression 
defaults to null. 


126 Assembler H Version 2 Programming Guide 


Programmer Response: Supply a valid 


expression. 
Severity: 8 
lIEVO94 SUBSTRING GOES PAST STRING 


END. DEFAULT=REMAINDER 


Explanation: The second expression of a sub- 
String notation specifies a length that extends 
beyond the end of the string. 


System Action: The result of the substring oper- 
ation is a string that ends with the last character 
in the character string. 


Programmer Response: Make sure the arith- 
metic expression used to specify the length does 
not specify characters beyond the end of the 
String. Either change the first or the second 
expression in the substring notation. 


Severity: 0 


SUBSTRING EXPRESSION 2 LESS 
THAN 0. DEFAULT=NULL 


IEVO95 


Explanation: The second arithmetic expression 
of a SETC substring is less than or equal to zero. 


System Action: No characters (a null string) 
from the substring character expression are 
used. 


Programmer Response: Supply a valid 
expression. 


Severity: 4 


UNSUBSCRIPTED SYSLIST. 
DEFAULT=SYSLIST(1) 


IEVO96 


Explanation: The system variable symbol, 
&SYSLIST, is not subscripted. &SYSLIST(n) 
refers to the nth positional parameter in a macro 
instruction. Note that N'&SYSLIST does not 
have to be subscripted. 


System Action: The subscript defaults to one so 
that the first positional parameter will be 
referred to. 


Programmer Response: Supply an appropriate 
subscript. 


Severity: 8 








lIEV097 INVALID ATTRIBUTE REFERENCE TO 
SETA OR SETB SYMBOL. 


DEFAULT=U OR 0 


Explanation: A type (T'), length (L'), scaling 
(S'), integer (I'), or defined (D') attribute refers 
to a SETA or SETB symbol. 


System Action: The attributes are set to default 
values: T'=U, L'=0, S$’ =O, and D'=0. 


Programmer Response: Change or remove the 
attribute reference. 


Severity: 8 


lIEVO98 ATTRIBUTE REFERENCE TO INVALID 


SYMBOL. DEFAULT=U OR 0 


Explanation: An attribute attempted to reference 
an invalid symbol. (A valid symbol is 1 to 63 
alphameric characters, the first of which is 
alphabetic.) 


System Action: For a type (T') attribute, defaults 
to U. For all other attributes, defaults to O. 


Programmer Response: Supply a valid symbol. 


Severity: 8 


IEVO9S WRONG TYPE OF CONSTANT FOR S' 
OR |' ATTRIBUTE REFERENCE. 


DEFAULT=0 


Explanation: An integer (I') or scaling (S') attri- 
bute references a symbol whose type Is other 
than floating-point (E,D,L), decimal (P,Z), or 
fixed-point (H,F). 


System Action: The integer or scaling attribute 
defaults to zero. 


Programmer Response: Remove the integer or 
scaling attribute reference or change the con- 
stant type. 


Severity: 4 


IEV100 SUBSCRIPT LESS THAN 1. DEFAULT 


TO SUBSCRIPT = 1. 


Explanation: The subscript of a subscripted SET 
symbol in the name field of a SET statement, the 
operand field of a GBL or LCL statement, or an 
&SYSLIST statement is less than 1. 


System Action: The subscript defaults to 1. 


Programmer Response: Supply the correct sub- 
script. 


Severity: 8 


1EV101 SUBSCRIPT LESS THAN 1. DEFAULT 


TO VALUE=0 OR NULL 


Explanation: The subscript of a SET symbol in 
the operand field is less than 1. 


System Action: The subscript is set to 1. 


Programmer Response: Supply a valid sub- 
script. 


Severity: 8 


IEV102 ARITHMETIC TERM IS NOT 


SELF-DEFINING TERM. DEFAULT=0 


Explanation: A SETC term or expression used as 
an arithmetic term is not a self-defining term. 


System Action: The value of the SETC term or 
expression is set to zero. 


Programmer Response: Make the SETC a self- 
defining term, such as C'A', X'1EC', B'1101', or 
2/7. Note that the C, X, or B and the quotation 
marks must be part of the SETC value. 


Severity: 8 


1IEV103 MULTIPLICATION OVERFLOW. 


DEFAULT PRODUCT = 1 


Explanation: A multiplication overflow occurred 
in a macro definition statement. 


System Action: The value of the expression up 
to the point of overflow is set to one; evaluation 
is resumed. 


Programmer Response: Change the expression 
so that overflow does not occur; break it into two 
Or more operations, or regroup the terms by 
parentheses. 


Severity: 8 


IEV105 ARITHMETIC EXPRESSION TOO 


COMPLEX 


Explanation: An arithmetic expression in a 
macro definition statement caused an overflow 
because it is too complex; that Is, it has too 
many terms and/or levels. 


System Action: The assembly is terminated. 
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Programmer Response: Simplify the expression 
or break it into two or more expressions. 


Severity: 20 


WRONG TARGET SYMBOL TYPE. 
VALUE LEFT UNCHANGED 


IEV106 


Explanation: The SET symbol in the name field 
does not match its declared type (does not 
match the operation code): SETA, SETB, or 
SEL. 


System Action: The statement is ignored. 


Programmer Response: Make the declaration 
agree with the SET statement type. If you want 
to store across types, store first into a SET 
symbol of matching type. 


Severity: 8 


INCONSISTENT DIMENSION ON 
TARGET SYMBOL. SUBSCRIPT 
IGNORED OR 1 USED 


1EV107 


Explanation: The SET symbol in the name field 
is dimensioned (subscripted), but was not 
declared in a GBL or LCL statement as dimen- 
sioned, or vice versa. 


System Action: The subscript is ignored or a 
subscript of 1 is used, in accordance with the 
declaration. 


Programmer Response: Make the declaration 
and the usage compatible. Note that you can 
declare a local SET symbol as dimensioned by 
using it, subscripted, in the name field of a SET 
statement. 


Severity: 8 


INCONSISTENT DIMENSION ON SET 
SYMBOL REFERENCE. DEFAULT = QO, 
NULL, OR TYPE = U 


fEV108 


Explanation: A SET symbol in the operand field 
is dimensioned (subscripted), but was not 
declared in a GBL or LCL statement as dimen- 
sioned, or vice versa. 


System Action: A value of zero or null is used 
for the subscript. If the type attribute of the SET 
symbol is being requested, it is set to U. 
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Programmer Response: Make the declaration 
and the usage compatible. Note that you can 
declare a SET symbol as dimensioned by using 
it, subscripted, in the name field of a SET state- 
ment. 





Severity: 8 


MULTIPLE OPERANDS FOR UNDI- 
MENSIONED SET SYMBOL. GETS 
LAST OPERAND 


IEV109 


Explanation: Multiple operands were assigned 
to an undimensioned (unsubscripted) SET 
symbol. 


System Action: The SET symbol is given the 
value of the last operand. 


Programmer Response: Declare the SET symbol 
as dimensioned, or assign only one operand to 
it. 


Severity: 8 


LIBRARY MACRO 1ST STATEMENT 
NOT - MACRO - OR COMMENT 


IEV110 


Explanation: A statement other than a comment 
statement preceded a MACRO statement in a j 
macro definition read from a library. 


System Action: The macro definition is not read 
from the library. A corresponding macro call 
cannot be processed. 


Programmer Response: Ensure that the library 
macro definition begins with a MACRO state- 
ment preceded (optionally) by comment state- 
ments only. 


Severity: 12 


INVALID AIF OR SETB OPERAND 
FIELD 


1EV111 


Explanation: The operand of an AIF or SETB 
statement either does not begin with a left 
parenthesis or is missing altogether. 


System Action: The statement is ignored. 
Programmer Response: Supply a valid operand. 


Severity: 12 





JEV112 INVALID SEQUENCE SYMBOL 


Explanation: One of the following errors has 
occurred: 


e A sequence symbol doesn’t begin with a 
period followed by one to 62 alphameric 
characters, the first being alphabetic. 

« A sequence symbol in the name field was 
created by substitution. 

e A sequence symbol contains an underscore 
character. 

| © Operand of AGO is blank or sequence 
| symbol in AIF is blank. 


System Action: The sequence symbol in the 
name field is ignored. A sequence symbol in the 
operand field of an AIF or AGO statement 
causes the entire statement to be ignored. 


Programmer Response: Supply a valid 
sequence symbol. 


Severity: 12 


IEV113 CONTINUE COLUMN BLANK 


Explanation: A SET symbol declaration in a GBL 
or LCL statement began with an ampersand in 
the end column (normally column 71) of the pre- 
vious card, but the continue column (normally 
column 16) of this card is blank. 


System Action: This card and any following 
cards of the statement are ignored. Any SET 
symbols appearing entirely on the previous 
card(s) are processed normally. 


Programmer Response: Begin this card in the 
continuation column. 


Severity: 12 


1IEV114 INVALID COPY OPERAND 


Explanation: The operand of a COPY statement 
is not a symbol of 1 to 8 alphameric characters, 
the first being alphabetic. 


System Action: The COPY statement is ignored. 
Programmer Response: Supply a valid operand. 


Severity: 12 


1EV115 COPY OPERAND TOO LONG 


Explanation: The symbol in the operand field: of 
a COPY statement is more than 8 characters 
long. 


System Action: The COPY statement is ignored. 
Programmer Response: Supply a valid operand. 


Severity: 12 


lIEV116 ILLEGAL SET SYMBOL 


Explanation: A SET symbol in the operand field 
of a GBL or LCL statement or in the name field 
of a SET statement does not consist of an 
ampersand followed by one to 62 alphameric 
characters, the first being alphabetic. 


System Action: The invalid SET symbol and all 
following SET symbols in a GBL or LCL state- 
ment are ignored. The entire SET statement is 
ignored. 


Programmer Response: Supply a SET symbol. 


Severity: 8 


1IEV117 ILLEGAL SUBSCRIPT 


Explanation: The subscript following a SET 
symbol contained unbalanced parentheses or an 
invalid arithmetic expression. 


System Action: This statement is ignored. 


Programmer Response: Supply an equal 
number of left and right parentheses or a valid 
arithmetic expression. 


Severity: 8 


1IEV118 SOURCE MACRO ENDED BY --MEND-- 


IN COPY CODE 


Explanation: A library member, being copied by 
a COPY statement within a macro definition, 
contained a MEND statement. This terminated 
the definition. 


System Action: The MEND statement is ignored. 
No more COPY code is read. The statements 
brought in before the end of the COPY code are 
processed. The macro definition is resumed 
with the statement following the COPY state- 
ment. 
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Programmer Response: Make sure that each 
library member to be used as COPY code con- 
tains balanced MACRO and MEND statements. 


Severity: 12 


IEV119 TOO FEW MEND STATEMENTS IN 


COPY CODE 


Explanation: A macro definition is started in a 
library member brought in by a COPY statement 
and the COPY code ends before a MEND state- 
ment is encountered. 


System Action: A MEND statement is generated 
to terminate the macro definition. The state- 
ments brought in before the end of the COPY 
code are processed. 


Programmer Response: Check to See if part of 
the macro definition was lost. Also, ensure that 
each macro definition to be used as COPY code 
contains balanced MACRO and MEND state- 
ments. 


Severity: 12 


IEV120 EOD WHERE CONTINUE CARD 
EXPECTED 


Explanation: An end-of-data occurred when a 
continuation card was expected. 


System Action: The portion of the statement 
read in is assembled. The assembly is termi- 
nated if the end-of-data is on SYSIN. If a library 
member is being copied, the assembly continues 
with the statement after the COPY statement. 


Programmer Response: Check to determine 
whether any statements were omitted from the 
source program or from the COPY code. 


Severity: 12 


IEV121 INSUFFICIENT CORE FOR EDITOR 


WORK AREA 


Explanation: The macro editor module of the 
assembler cannot get enough main storage for 
its work areas. 


System Action: The assembly is terminated. 


Programmer Response: Split the assembly into 
two or more parts or give the macro editor more 
working storage. This can be done by 
increasing the region size for the assembler, 
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decreasing blocking factor or block size on the 
assembler data sets, or a combination of both. 


Severity: 12 


IEV122 ILLEGAL OPERATION CODE FORMAT 


Explanation: The operation code is not followed 
by a blank or is missing altogether, or the first 
card of a continued source statement is missing. 


System Action: The statement is ignored. 


Programmer Response: Ensure that the state- 
ment has a valid operation code and that all 
cards of the statement are present. 


Severity: 12 


1IEV123 VARIABLE SYMBOL TOO LONG 


Explanation: A SET symbol, symbolic parameter, 
Or sequence symbol contains more than 62 char- 
acters following the ampersand or period. 


System Action: This statement is ignored. 


Programmer Response: Shorten the variable 
symbol or sequence symbol. 


Severity: 12 


1IEV124 ILLEGAL USE OF PARAMETER 


Explanation: A symbolic parameter was used in 
the operand field of a GBL or LCL statement or 
in the name field of a SET statement. In other 
words, a variable symbol has been used both as 
a symbolic parameter and as a SET symbol. 


System Action: The statement is ignored. 


Programmer Response: Change the variable 
symbol to one that is not a symbolic parameter. 


Severity: 12 


IEV125 ILLEGAL MACRO NAME - MACRO 


UNCALLABLE 


Explanation: The operation code of a macro pro- 
totype statement is not a valid symbol; that ts, 
one to 63 alphameric characters, the first alpha- 
betic. 


System Action: The macro definition is edited. 
However, since the macro name is invalid, the 
macro cannot be called. 








J 


Programmer Response: Supply a valid macro 


name. 
Severity: 12 
IEV126 LIBRARY MACRO NAME INCORRECT 


Explanation: The operation code of the prototype 
statement of a library macro definition is not the 
same as the operation code of the macro 
instruction (call). Library macro definitions are 
located by their member names. However, the 
assembler compares the macro instruction with 
the macro prototype. 


System Action: The macro definition is edited 
using the operation code of the prototype state- 
ment as the macro name. Thus, the definition 
Cannot be called by this macro instruction. 


Programmer Response: Ensure that the member 
name of the macro definition is the same as the 
operation code of the prototype statement. This 
will usually require listing the macro definition 
from the library. 


Severity: 12 


lIEV127 ILLEGAL USE OF AMPERSAND 


Explanation: One of the following errors has 
occurred: 


e An ampersand was found where all substi- 
tution should have already been performed. 

e The standard value of a keyword parameter 
in a macro prototype statement contained a 
single ampersand or a string of ampersands 
whose length was odd. 

e An unpaired ampersand occurred tn a char- 
acter (C) constant. 


System Action: In a macro prototype statement, 
all information following the error is ignored. In 
other statements, the action depends on which 
field the error occurred in. If the error occurred 
in the name field, the statement is processed 
without a name. If the error occurred in the 
operation code field, the statement is ignored. lf 
the error occurred in the operand field, another 
message is issued to specify the default. 
However, if the error occurred in a C-type con- 
Stant, the operand in error and the following 
operands are ignored. 


Programmer Response: Ensure that ampersands 
used in keyword standard values or in C-type 


constants occur in pairs. Also, avoid substituting 
an ampersand tnto a statement unless there Is a 
double ampersand. 


Severity: 12 


IEV128 EXCESS RIGHT PARENTHESIS 


Explanation: An unpaired right parenthesis has 
been found. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
ignored and an additional message relative to 
the statement type appears. However, if the 
error is in the standard value of a keyword on a 
macro prototype statement, only the operands in 
error and the following operands are ignored. 


Programmer Response: Make sure that all 
parentheses are paired. 


Severity: 12 


IEV129 INSUFFICIENT RIGHT PARENTHESES 


Explanation: An unpaired left parenthesis has 
been found. Note that parentheses must 
balance at each comma in a multiple operand 
statement. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction Is 
ignored and an additional message relative to 
the statement type will appear. However, if the 
error is in the standard value of a keyword on a 
macro prototype statement, only the operands in 
error and the following operands are ignored. 


Programmer Response: Make Sure that all 
parentheses are paired. 


Severity: 12 


1EV130 ILLEGAL ATTRIBUTE REFERENCE 


Explanation: One of the following errors has 
occurred: 


e The symbol following a D, |, L, S, or T attri- 
bute reference is not a valid variable symbol 
or ordinary symbol. 

e The symbol following a K or N attribute ref- 
erence is not a valid variable symbol. 

e The quote is missing from aT attribute refer- 
ence. 


System Action: The statement is ignored. 
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Programmer Response: Supply a valid attribute 


reference. 
Severity: 12 
IEV131 PARENTHESIS NESTING DEPTH 


EXCEEDS 255 


Explanation: There are more than 255 levels of 
parentheses in a SETA expression. 


System Action: The statement is ignored. 


Programmer Response: Rewrite the SETA state- 
ment using several statements to regroup the 
Subexpressions in the expression. 


Severity: 12 


IEV132 INVALID SETB EXPRESSION 


Explanation: A SETB expression in the operand 
field of a SETB statement or an AIF statement 
does not consist of valid character relational 
expressions, arithmetic relational expressions, 
and single SETB symbols, connected by logical 
operators. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid SETB 


expression. 
Severity: 12 
IEV133 ILLEGAL SUBSTRING REFERENCE 


Explanation: A substring expression following a 
SETC expression does not consist of two valid 
SETA expressions separated by a comma and 
enclosed tn parentheses. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid substring 


expression. 
Severity: 12 
IEV134 INVALID RELATIONAL OPERATOR 


Explanation: Characters other than EQ, NE, LT, 
GT, LE, or GE are used in a SETB expression 
where a relational operator is expected. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid relational 
operator. 
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Severity: 12 


1IEV135 INVALID LOGICAL OPERATOR 


Explanation: Characters other than AND, OR, or 
NOT are used in a SETB expression where a 
logical operator is expected. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid logical 


operator. 
Severity: 12 
IEV136 ILLEGAL LOGICAL/RELATIONAL 


OPERATOR 


Explanation: Characters other than a valid 
logical or relational operator were found where 
a logical or relational operator was expected. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid logical or 
relational operator. 


Severity: 12 


1EV137 ILLEGAL SETC EXPRESSION 


Explanation: The operand of a SETC statement 
or the character value used in a character 
relation is erroneous. It must be a valid type 
attribute (T') reference or a valid Character 
expression enclosed in quotation marks. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid 


expression. 
Severity: 12 
IEV139 EOD DURING REPRO PROCESSING 


Explanation: A REPRO statement was imme- 
diately followed by an end-of-data so that no 

valid card could be punched. The REPRO is 

either the last card of source input or the last 
card of a COPY member. 


System Action: The REPRO statement is 
ignored. 


Programmer Response: Remove the REPRO or 
ensure that it is followed by a card to be 
punched. 


Severity: 12 











IEV140 END CARD MISSING 


Explanation: End-of-file on the source input data 
set occurred before an END statement was read. 
One of the following has occurred: 


° The END statement was omitted or mis- 
spelled. 

e The END operation code was changed or 
deleted by OPSYN or by definition of a 
macro named END. The look-ahead phase 
of the assembler marks what it thinks is the 
END statement. If an OPSYN statement or a 
macro definition redefines the END state- 
ment, premature end-of-input may occur 
because the assembler will not pass the ori- 
ginal END statement. 


System Action: An END statement is generated. 
It is assigned a statement number but not 
printed. If any literals are waiting, they will be 
processed as usual following the END statement. 


Programmer Response: Check for lost cards. 
Supply a valid END statement; or, if you use 
OPSYN to define another symbol as END, place 
it prior to possible entry into the look-ahead 
phase. 


Severity: 4 


IEV141 BAD CHARACTER IN OPERATION 


CODE 


Explanation: The operation code contains a non- 
alphameric character, that is, a character other 
than A to Z, 0 to 9, $, #, or @. Embedded blanks 
are not allowed. 


System Action: The statement Is ignored. 


Programmer Response: Supply a valid operation 


code. If the operation code is formed by vari- 
able symbol substitution, check the statements 
leading to substitution. 


Severity: 8 


OPERATION CODE NOT COMPLETE 
ON FIRST CARD 


lIEV142 


Explanation: The entire name and operation 
code, including a trailing blank, is not contained 
on the first card (before the continue 
column—usually column 72) of a continued state- 
ment. 


System Action: The statement is ignored. 


Programmer Response: Shorten the name 
and/or the operation code or simplify the state- 
ment by using a separate SETC statement to 
create the name or operation code by substi- 
tution. 


Severity: 8 


IEV143 BAD CHARACTER IN NAME FIELD 


Explanation: The name field contains a nonal- 
phameric character, that is, a character other 
than A to Z, 0 to 9, $, #, @, or _. (Note: _ is 
invalid for external names or in the name field of 
an OPSYN instruction.) 


System Action: If possible, the statement is 
processed without a name. Otherwise, it is 
ignored. 


Programmer Response: Put a valid symbol in 
the name field. 


Severity: 8 


1EV144 BEGIN-TO-CONTINUE COLUMNS NOT 


BLANK 


Explanation: On a continuation card, one or 
more columns between the begin column 
(usually column 1) and the continue column 
(usually column 16) are not blank. 


System Action: The extraneous characters are 
ignored. 


Programmer Response: Check whether the 
operand started in the wrong column or whether 
the preceding card contained an erroneous con- 
tinue punch. 


Severity: 8 


IEV145 OPERATOR, RIGHT PARENTHESIS, 


OR END-OF-EXPRESSION EXPECTED 
Explanation: One of the following has occurred: 


e A letter, number, equal sign, quotation mark, 
or undefined character occurred following a 
term where a right parenthesis, an operator, 
a comma, or a blank ending the expression 
was expected. 

e In an assembler instruction, a left paren- 
thesis followed a term. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
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ignored and another message, relative to the 
operation code, Is issued. 


Programmer Response: Check for an omitted or 
mispunched operator. Subscripting is not 
allowed on this statement. 


Severity: 8 


SELF-DEFINING TERM TOO LONG OR 
VALUE TOO LARGE 


1IEV146 


Explanation: A self-defining term is longer than 
4 bytes, (8 hexadecimal digits, 32 bits, or 4 char- 
acters), or the value of a decimal self-defining 
term is greater than 2°'-1. 


System Action: A machine instruction is assem- 
bled as zero. An assembler instruction is 
ignored. However, another message, relative to 
the operation code, is issued. 


Programmer Response: Reduce the size of the 
self-defining term, or specify it in a DC state- 
ment. 


Severity: 8 


1EV147 SYMBOL TOO LONG, OR 1ST CHAR- 


ACTER NOT ALETTER 


Explanation: A symbol does not begin with a 
letter or is longer than 63 characters. 


System Action: If the symbol is in the name 
field, the statement is processed as unnamed. lf 
the symbol is in the operand field, an assembler 
operation or a macro definition model statement 
is ignored and a machine operation is assem- 
bled as zero. 


Programmer Response: Supply a valid symbol. 


Severity: 8 


lIEV148 SELF-DEFINING TERM LACKS 
ENDING QUOTE OR HAS BAD CHAR- 


ACTER 


Explanation: A hexadecimal! or binary self- 
defining term contains an invalid character or is 
missing the final quotation mark, or a pure 
DBCS self-defining term contains SO and SI with 
no double-byte data between them. 


System Action: A machine operation is assem- 
bled as zero. An assembler operation is ignored 


134 Assembler H Version 2 Programming Guide 


and another message, relative to the operation 
code, is issued. 


Programmer Response: Correct the invalid term. 


Severity: 8 


LITERAL LENGTH EXCEEDS 256 
CHARACTERS, INCLUDING EQUAL 
SIGN 


1IEV149 


Explanation: A literal is longer than 256 charac- 
ters. 


System Action: The instruction is assembled as 
zero. 


Programmer Response: Shorten the literal, or 
change it to a DC statement. 


Severity: 8 


SYMBOL HAS NON-ALPHAMERIC 
CHARACTER OR INVALID DELIMITER 


lIEV150 


Explanation: The first character following a 
symbol is not a valid delimiter (plus sign, minus 
sign, asterisk, slash, left or right parenthesis, 
comma, or blank). 


System Action: A machine operation is assem- 
bled as zero. An assembler operation is 
ignored, and another message, relative to this 
operation code, Is issued. 


Programmer Response: Ensure that the symbol 
does not contain a nonalphameric character or 
that it is followed by a valid delimiter. 


Severity: 8 


LITERAL EXPRESSION MODIFIERS 
MUST BE ABSOLUTE AND PREDE- 
FINED 


1EV151 


Explanation: The duplication factor or length 
modifier in a literal is not (1) a self-defining term 
or (2) an expression using self-defining terms or 
previously defined symbols. 


System Action: The statement is assembled as 
zero. 


Programmer Response: Supply a valid self- 
defining term or ensure that symbols appear in 
the name field of a previous statement. 


Severity: 8 











1EV152 EXTERNAL SYMBOL TOO LONG OR 


UNACCEPTABLE CHARACTER 


Explanation: One of the following errors has 
occurred: 


e An external symbol is longer than 8 charac- 
ters, or contains a bad character. An 
external symbol might be the name of a 
CSECT, START, DXD, AMODE, RMODE, or 
COM statement, or the operand of an 
ENTRY, EXTRN, or WXTRN statement or a 
Q-type or V-type address constant. 

e The operand of an ENTRY, EXTRN, or 
WXTRN statement or a Q-type or V-type 
address constant is an expression instead of 
a single term, or contains a bad character. 


System Action: The symbol does not appear in 
the external symbol dictionary. If the error is In 
the name field, an attempt is made to process 
the statement as unnamed. If the error is in the 
operand field, the bad operand is ignored and, if 
possible, the following operands are processed. 
A bad constant is assembled as zero. 


Programmer Response: Supply a shorter name 
or replace the expression with a term. 


Severity: 12 


IEV153 START STATEMENT ILLEGAL - CSECT 
ALREADY BEGUN 


Explanation: A START statement occurred after 
the beginning of a control section. 


System Action: The statement is processed as a 
CSECT statement; any operand is ignored. 


Programmer Response: Ensure that the START 
precedes all machine instructions and any 
assembler instruction, such as EQU, that initiates 
a control section. If you want EQU statements 
before the START, place them in a dummy 
section (DSECT). 


Severity: 12 


1EV154 OPERAND MUST BE ABSOLUTE, PRE- 
DEFINED SYMBOLS. SET TO 0 


Explanation: The operand on a START or 
MHELP statement is invalid. If there is another 
message with this statement, this message is 
advisory. If this message appears alone, it indi- 
cates one of the following: 


« There is a location counter reference (*) in a 
START operand. 

e An expression does not consist of absolute 
terms and/or predefined symbols. 

« The statement is too complex. For example, 
it may have too many forward references or 
cause arithmetic overflow during evaluation. 

e The statement is circularly defined. 

e A relocatable term is multiplied or divided. 


System Action: The operand of the statement is 
treated as Zero. 


Programmer Response: Correct the error if it 
exists. Note that paired relocatable symbols in 
different LOCTRs, even though in the same 
CSECT or DSECT, are not valid where an abso- 
lute, predefined value is required. 


Severity: 8 


1EV155 PREVIOUS USE OF SYMBOL IS NOT 
THIS SECTION TYPE 


Explanation: The name on a CSECT, DSECT, 
COM, or LOCTR statement has been used previ- 
ously, on a different type of statement. For 
example, the name on a CSECT has been used 
before on a statement other than CSECT, such 
as a machine instruction or a LOCTR. 


System Action: This name is ignored, and the 
statement is processed as unnamed. 


Programmer Response: Correct the misspelled 
name, or change the name to one that does not 
conflict. 


Severity: 12 


IEV156 ONLY ORDINARY SYMBOLS, SEPA- 
RATED BY COMMAS, ALLOWED 


Explanation: The operand field of an ENTRY, 
EXTRN, or WXTRN statement contains a symbol 
that does not consist of 1 to 8 alphameric char- 
acters, the first being alphabetic, or the oper- 
ands are not separated by a comma. 


System Action: The operand in error is ignored. 
If other operands follow, they will be processed 
normally. 


Programmer Response: Supply a correct symbol 
or insert the missing comma. If you want an 
expression as an ENTRY statement operand 
(such as SYMBOL +4), use an EQU statement to 
define an additional symbol. 
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Severity: 12 


1EV157 OPERAND MUST BEA 


SIMPLY-RELOCATABLE EXPRESSION 


Explanation: If there is another message with 
this statement, this message is advisory. /f this 
message appears alone, the operand of an ORG 
or END statement is not a simple relocatable 
expression, is too complex, or is circularly 
defined. The error may also be that the END 
operand symbol is not in a CSECT. 


System Action: An ORG statement or the 
operand of an END statement is ignored. 


Programmer Response: If an error exists, supply 
a correct expression. Note that paired relocat- 
able symbols in different LOCTRs, even though 
in the same CSECT or DSECT, may cause cir- 
cular definition when used in an ORG statement. 


Severity: 12 


IEV158 OPERAND 1 EXPRESSION IS DEFEC- 


TIVE. SET FO * 


Explanation: The first operand of an EQU state- 
ment is defective. If another message appears 
with this statement, this message is advisory. If 
this message appears alone, one of the following 
errors has occurred: 


* The statement is too complex. For example, 
it has too many forward references or 
causes dan arithmetic overflow during evalu- 
ation. 

e The statement is circularly defined. 

e The statement contains a relocatable term 
that is multiplied or divided. 


System Action: The symbol in the name field is 
equated to the current value of the location 
counter (*), and operands 2 and 3 of the state- 
ment, if present, are ignored. 


Programmer Response: If an error exists, supply 
a correct expression for operand 1 of the state- 
ment. 


Severity: 8 


IEV159 OPERANDS MUST BE ABSOLUTE, 


PROPER MULTIPLES OF 2 OR 4 


Explanation: The combination of operands of a 
CNOP statement is not one of the following valid 
combinations: 
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-> © © 
co co 
Om BS BS 
Cc & = 


3 +] 





System Action: The statement is ignored. 
However, the location counter is adjusted to a 
halfword boundary. 


Programmer Response: Supply a valid combina- 
tion of CNOP operands. 


Severity: 12 


IEV161 ONLY ONE TITLE CARD MAY HAVE A 


NAME FIELD 


Explanation: More than one TITLE statement has 
a name field. The named TITLE statement need 
not be the first one in the assembly, but it must 
be the only one named. 


System Action: The name on this TITLE state- 
ment is ignored. The name used for deck iden- 
tification is taken from the first named TITLE 
statement encountered. 


Programmer Response: Delete the unwanted 
name. 


Severity: 4 





lIEV162 PUNCH OPERAND EXCEEDS 80 


COLUMNS. IGNORED 


Explanation: A PUNCH statement attempted to 
punch more than 80 characters into a card. 


System Action: The statement is ignored. The 
card is not punched. 


Programmer Response: Shorten the operand to 
80 characters or fewer or use more than one 
PUNCH statement. 


Severity: 12 


lIEV163 OPERAND NOT PROPERLY 


ENCLOSED IN QUOTES 


Explanation: The operand of a PUNCH or TITLE 
Statement does not begin with a quotation mark, 
or the operand of a PUNCH, MNOTE, or TITLE 
statement does not end with a quotation mark, 
or the ending quotation mark is not followed by 
a blank. 


System Action: The statement is ignored. 


Programmer Response: Supply the missing quo- j 
tation mark. Be sure that a quotation mark to be 





punched as data is represented as two quotation 
marks. 


Severity: 8 


OPERAND IS A NULL STRING - CARD 
NOT PUNCHED 


IEV164 


Explanation: A PUNCH statement does not have 
any characters between its two single quotation 

marks, or a single quotation mark to be punched 
as data is not represented by two single quota- 

tion marks. 


System Action: The statement is ignored. 


Programmer Response: Correct the operand. If 
you want to “punch” a blank card, the operand 
of the PUNCH statement should be a blank 
enclosed in single quotation marks. 


Severity: 12 


IEV165 UNEXPECTED NAME FIELD 


Explanation: The assembler operation has a 
name and the name field should be blank. 


System Action: The name is equated to the 
current value of the location counter ({*). 
However, if no control section has been started, 
the name is equated to zero. 


Programmer Response: Remove the name. 
Check that the period was not omitted from a 
sequence symbol. 


Severity: 4 


IEV166 SEQUENCE SYMBOL TOO LONG 


Explanation: A sequence symbol contains more 
than 62 characters following the period. 


System Action: If the sequence symbol is in the 
name field, the statement is processed without a 
name. If it is in the operand field of an AIF or 

AGO statement, the entire statement is ignored. 


Programmer Response: Shorten the sequence 
symbol. 


Severity: 12 


1EV167 REQUIRED NAME MISSING 


Explanation: This statement requires a name 
and has none. The name field may be blank 
because an error occurred during an attempt to 
create the name by substitution or because a 
Sequence symbol was used as the name. 


System Action: The statement is ignored. 


Programmer Response: Supply a valid name or 
ensure that a valid name Is created by substi- 
tution. If a sequence symbol is needed, put it on 
an ANOP statement ahead of this one and put a 
name on this statement. 


Severity: 8 


IEV168 UNDEFINED SEQUENCE SYMBOL 


Explanation: The sequence symbol in the 
operand field of an AIF or AGO statement 
outside a macro definition is not defined; that is, 
it does not appear in the name field of an appro- 
priate statement. 


System Action: This statement is ignored; 
assembly continues with the next statement. 


Programmer Response: lf the sequence symbol 
is misspelled or omitted, correct it. Note that, 
when the sequence symbol is not previously 
defined, the assembler looks ahead for the defi- 
nitions. The look-ahead stops when an END 
statement or an OPSYN equivalent is encount- 
ered. Be sure that OPSYN statements and 
macro definitions that redefine END precede 
possible entry into look-ahead. 


Severity: 16 


1EV170 INTERLUDE ERROR - LOGGING 


CAPACITY EXCEEDED 


Explanation: The table that the interlude phase 
of the assembler uses to keep track of the errors 
it detects is full. This does not stop error 
detection by other phases of the assembler. 


System Action: If there are additional errors, 
normally detected by the interlude phase, in 
other statements either before or after this one, 
they will not be flagged. Statement processing 
depends on the type of error. 


Programmer Response: Correct the indicated 
errors, and run the assembly again to diagnose 
any further errors. 
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Severity: 12 


IEV171 STANDARD VALUE TOO LONG 


Explanation: The standard (default) value of a 
keyword parameter on a macro prototype state- 
ment is longer than 255 characters. 


System Action: The parameter in error and the 
following parameters are ignored. 


Programmer Response: Shorten the standard 
value. 


Severity: 12 


IEV172 NEGATIVE DUPLICATION FACTOR. 


DEFAULT = 1 


Explanation: The duplication factor of a SETC 
Statement is negative. 


System Action: The duplication factor is given a 
default value of 1. 


Programmer Response: Supply a positive dupli- 
cation factor. 


Severity: 8 


lIEV173 DELIMITER ERROR, EXPECT BLANK 


Explanation: Another character, such as a 
comma or a quotation mark, is used where a 
blank (end of operand) is required. 


System Action: A machine instruction is assem- 
bled as zero. An ORG statement is ignored. For 
an EQU or END statement, the invalid delimiter 
is ignored and the operand is processed 
normally. For a CNOP statement, the location 
counter is aligned to a halfword boundary. 


Programmer Response: Replace the invalid 
delimiter with a blank. Look for an extra 
operand or a missing left parenthesis. 


Severity: 12 


IEV174 DELIMITER ERROR, EXPECT BLANK 


OR COMMA 


Explanation: Another character, such as a quo- 
tation mark or ampersand, is used where a 
blank or a comma ts required. 


System Action: A machine instruction is assem- 
bled as zero. For a USING or DROP statement, 

the invalid delimiter is ignored and the operand 

Is processed normally. 
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Programmer Response: Replace the invalid 
delimiter with a blank or a comma. Look for an 
extra operand or a missing left parenthesis. 





Severity: 12 


lIEV175 DELIMITER ERROR, EXPECT COMMA 


Explanation: Another character, such as a blank 
or a parenthesis, is used where a comma is 
required. 


System Action: A machine instruction is assem- 
bled as zero. For a CNOP statement, the 
location counter is aligned to a halfword 
boundary. 


Programmer Response: Replace the invalid 
delimiter with a comma. Be sure each 
expression is syntactically correct and that no 
parentheses are omitted. 


Severity: 12 


DELIMITER ERROR, EXPECT COMMA 
OR LEFT PARENTHESIS 


lIEV176 


Explanation: Another character, such as a blank 
or a right parenthesis, is used in a machine 
instruction where a comma or a left parenthesis 
is required. 





System Action: The machine instruction is 
assembled as zero. 


Programmer Response: Replace the invalid 
delimiter with a comma or a left parenthesis. 
Look for invalid syntax or invalid base or length 
fields on the first operand. 


Severity: 12 


IEV177 DELIMITER ERROR, EXPECT BLANK 


OR LEFT PARENTHESIS 


Explanation: Another character, such as a 
comma or a right parenthesis, is used in a 
machine instruction when a blank or a left 
parenthesis Is required. 


System Action: The machine instruction is 
assembled as zero. 


Programmer Response: Replace the invalid 
delimiter with a blank or a left parenthesis. 
Look for invalid punctuation or invalid length, 


index, or base field. : 
Severity: 12 J 





C 


lIEV178 DELIMITER ERROR, EXPECT COMMA 


OR RIGHT PARENTHESIS 


Explanation: Another character, such as a blank 
or a left parenthesis, is used in a machine 
instruction when a comma or a right parenthesis 
is required. 


System Action: The machine instruction is 
assembled as zero. 


Programmer Response: Replace the invalid 
delimiter with a comma or a right parenthesis. 
Look for a missing base field. 


Severity: 12 


IEV179 DELIMITER ERROR, EXPECT RIGHT 


PARENTHESIS 


Explanation: Another character, such as a blank 
or a comma, is used in a machine instruction 
when a right parenthesis is required. 


System Action: The machine instruction is 
assembled as zero. 


Programmer Response: Replace the invalid 
delimiter with a right parenthesis. Look for an 
index field used where it is not allowed. 


Severity: 12 


IEV180 OPERAND MUST BE ABSOLUTE 


Explanation: The operand of a SPACE statement 
or the first, third, or fourth operand of a CCW 
statement is not an absolute term. 


System Action: A SPACE statement is ignored. 
A CCW statement is assembled as zero. 


Programmer Response: Supply an absolute 
operand. Note that paired relocatable terms 
may span LOCTRs but must be in the same 
control section. 


Severity: 12 


IEV181 CCW OPERAND VALUE IS OUTSIDE 


ALLOWABLE RANGE 


Explanation: One or more operands of a CCW 
statement are not within the following limits: 


e 1st operand—O to 255 
e 2nd operand—O to 16 777 215 (CCW, CCWO): 
or 0 to 2 147 483 647 (CCW1) 


e 3rd operand—O-255 and a multiple of 8 
e 4th operand—O-65,535 


System Action: The CCW is assembled as zero. 
Programmer Response: Supply valid operands. 


Severity: 12 


IEV182 OPERAND 2 MUST BE ABSOLUTE, 
0-65535. IGNORED 


Explanation: If there is another message with 
this statement, this message is advisory. If this 
message appears alone, the second operand of 
an EQU statement contains one of the following 
errors: 


e It is not an absolute term or expression 
whose value is within the range of 0 to 
65,535. 

e It contains a symbol that is not previously 
defined. 

e |t is circularly defined. 

e |t is too complex; for example, it causes an 
arithmetic overflow during evaluation. 

e It is derived from an absolute value. 


System Action: Operand 2 is ignored, and the 
length attribute of the first operand is used. If 
the third operand is present, it will be processed 
normally. 


Programmer Response: Correct the error if it 
exists. Note that paired relocatable symbols in 
different LOCTRs, even though in the same 
CSECT, are not valid where an absolute, prede- 
fined value is required. 


Severity: 8 


IEV183 OPERAND 3 MUST BE ABSOLUTE, 
0-255. IGNORED 


Explanation: If there is another message with 
this statement, this message is advisory. lf this 
message appears alone, the third operand of an 
EQU statement contains one of the following 
errors: 


e It is not an absolute term or expression 
whose value is within the range of 0 to 259. 

e It contains a symbol that is not previously 
defined. 

e It is circularly defined. 

e |t is too complex; for example, it causes an 
arithmetic overflow during evaluation. 
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System Action: The third operand is ignored, 
and the type attribute of the EQU statement is 
set to U. 


Programmer Response: Correct the error if it 
exists. Note that paired relocatable symbols in 
different LOCTRs, even though in the same 
CSECT, are not valid where an absolute, prede- 
fined value is required. 


Severity: 8 


1EV184 COPY DISASTER 


Explanation: The assembler copied a library 
member (executed a COPY statement) while 
looking ahead for attribute references. However, 
when the complete text was analyzed, the COPY 
Operation code had been changed by an OPSYN 
statement or “swallowed” by an AREAD state- 
ment, and the COPY should not have been exe- 
cuted. (Look-ahead phase ignores OPSYN 
statements.) This message will follow the first 
card of the COPY code. 


System Action: The library member will be 
assembled. If it included an ICTL statement, the 
format of that ICTL will be used. 


Programmer Response: Move COPY statements, 
or OPSYN statements that modify the meaning of 
COPY, to a point in the assembly prior to pos- 
sible entry into look-ahead mode. 


Severity: 16 


IEV185 OPERAND NO. 2 IS ERRONEOUS 


Explanation: The second operand is incorrect, or 
two operands appear where there should be 
only one. 


System Action: The second operand Is ignored. 


Programmer Response: Remove or correct the 
second operand. 


Severity: 4 


AMODE/RMODE ALREADY SET FOR 
THIS ESD ITEM 


1IEV186 


Explanation: A previous AMODE instruction has 
the same name field as this AMODE instruction, 
or a previouS RMODE instruction has the same 
name field as this RMODE instruction. 


System Action: The instruction in error is 
ignored. 
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Programmer Response: Remove the conflicting 
instruction or specify the name of another 
control section. 


Severity: 8 


IEV187 THE NAME FIELD IS INVALID 


Explanation: The name field of an AMODE 
instruction does not refer to a valid control 
section in this assembly, or the name field of an 
RMODE instruction does not refer to a valid 
control section in this assembly. 


System Action: The instruction in error is 
ignored, and the name field will not appear in 
the cross-reference listing. 


Programmer Response: Specify a valid control 
section in the name field of the AMODE or 
RMODE instruction. 


Severity: 8 


INCOMPATIBLE AMODE AND RMODE 
ATTRIBUTES 


IEV188 


Explanation: A previous AMODE 24 instruction 
has the same name field as this RMODE ANY 
instruction, or a previouS RMODE ANY instruc- 
tion has the same name field as this AMODE 24 
instruction. 


System Action: The instruction in error is 
ignored. 


Programmer Response: Change the AMODE and 
RMODE attributes so they are no longer incom- 
patible. All combinations except AMODE 24 and 
RMODE ANY are valid. 


Severity: 8 


SO OR SI IN CONTINUATION 
COLUMN - NO CONTINUATION 
ASSUMED 


IEV201 


Explanation: When Assembler H Is invoked with 
the DBCS option, the double-byte delimiters SO 
and S| are treated as blanks in the continuation 
column, and not as continuation indicators. 


System Action: The SO or SI in the continuation 
column is assembled as a blank, and the next 
line is not treated as a continuation line. 


Programmer Response: If continuation is 
required, then re-arrange the source line so that 
a non-blank EBCDIC character can be used to 











indicate continuation. If continuation is not 
required, check that everything preceding the SO 
or SI is complete and valid data. 


Severity: 4 


IEV202 NO DOUBLE-BYTE DATA FOUND AT 
AN EXTENDED CONTINUATION 


POINT 


Explanation: The extended continuation indicator 
feature is provided to permit continuation of 
double-byte data, and single-byte data adjacent 
to double-byte data. If used elsewhere, this 
message is issued to warn that a programming 
error may have been created. The data may 
have been treated unintentionally as an 
extended continuation indicator. 


System Action: The extended continuation indi- 
cators will not be assembled as part of the 
operand. 


Programmer Response: Change the continuation 
indicator if the unintentional truncation occurred. 


Severity: 4 


[EV203 UNBALANCED DOUBLE-BYTE DELIM- 


ITERS 


Explanation: A mismatched SO or SI has been 
found. This could be the result of truncated or 
nested double-byte data. Note that this error will 
NOT occur because valid double-byte data is 
truncated to fit within the explicit length specified 
for C-type DC, DS, and DXD statements and 
literals - this condition will produce error IEV208. 


System Action: The operand in error, and the 
following Operands are ignored. 


Programmer Response: Correct the invalid 
double-byte data. 


Severity: 8 


IEV204 INVALID DOUBLE-BYTE DATA 


Explanation: All data between SO and SI must 
be valid double-byte characters. A valid double- 
byte character is defined as either double-byte 
blank (X'4040'), or two bytes each of which must 
be in the range X'41' to X'FE' inclusive. 


Note: This error does not apply to the oper- 
ands of macro instructions. 


meee eee 


System Action: The operand in error, and the 
following operands are ignored. 


Programmer Response: Correct the invalid 
double-byte data. 


Severity: 8 


EXTENDED CONTINUATION COLUMN 
MUST NOT EXTEND INTO CONTINUE 
COLUMN 


IEV205 


Explanation: The extended continuation indicator 
extended into the continue column. 


System Action: The extended continuation indi- 
cator is ignored. The following record or 
records may be treated as invalid. The 
extended continuation indicators are treated as 
part of the source statement. 


Programmer Response: If the data in the 
extended continuation is to be regarded as valid 
input then another non-blank character must be 
used in the continuation indication column to 
identify the data as valid and to continue to the 
next record. If the data is not to be part of the 
constant then remove the characters of the 
extended continuation and add the correct data 
to the continue record to the point where the 
extended continuation is needed. This message 
may be encountered when converting code that 
assembled with the NODBCS option to code that 
is to be assembled with the DBCS option. 


Severity: 8 


1IEV206 G-TYPE CONSTANT MUST NOT 


CONTAIN SINGLE-BYTE DATA 


Explanation: A G-type constant or self-defining 
term, after substitution has occurred, must 
consist entirely of double-byte data, correctly 
delimited by SO and SI. If SO or SI are found in 
any byte position other than the first and last 
respectively (excepting redundant SI/SO pairs 
which are removed) then this error will be 
reported. 


System Action: The operand in error, and the 
following operands are ignored. 


Programmer Response: Either remove the 
single-byte data from the operand, or change the 
constant to a C-type. 


Severity: 8 
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IEV207 LENGTH OF G-TYPE CONSTANT 


MUST BE A MULTIPLE OF 2 


Explanation: A G-type constant must contain 
only double-byte data. If assembled with a 
length modifier which is not a multiple of 2, 
invalid double-byte data would be created. 


System Action: The operand in error, and the 
following operands are ignored. 


Programmer Response: Either correct the length 
modifier, or change the constant to a C-type. 


Severity: 8 


IEV208 TRUNCATION INTO DOUBLE-BYTE 


DATA IS NOT PERMITTED 


Explanation: The explicit length of a C-type con- 
stant in a DS, DC or DXD statement or literal 
must not cause the nominal value to be trun- 
cated at any point within double-byte data. 


System Action: The operand in error, and the 
following operands are ignored. 


Programmer Response: Either correct the length 
modifier, or change the double-byte data so that 
itis not truncated. 


Severity: 8 


IEV253 TOO MANY ERRORS 


Explanation: No more error messages can be 
issued for this statement, because the assem- 
bler work area in which the errors are logged is 
full. 


System Action: If no more errors are detected 
for this statement, the messages and/or anno- 
tated text is discarded. 


Programmer Response: Correct the indicated 
errors, and rerun the assembly. If there are 
more errors on this statement, they will be 
detected in the next assembly. 


Severity: 16 


IEV 254 *““* MNOTE *** 


Explanation: The text of an MNOTE statement, 
which is appended to this message, has been 
generated by your program or by a macro defi- 
nition or a library-member copied into your 
program. An MNOTE statement enables a 
source program or a macro definition to signal 
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the assembler to generate an error or informa- 
tional message. 


System Action: None. 


Programmer Response: Investigate the reason 
for the MNOTE. Errors flagged by MNOTE will 
often cause unsuccessful execution of the 
program. 


Severity: An MNOTE is assigned a severity code 
of 0 to 255 by the writer of the MNOTE statement. 


Abnormal Assembly Termination 
Messages 


Whenever an assembly cannot be completed, 
Assembler H provides a message and, in some 
cases, a specially formatted dump for diagnostic 
information. This may indicate an assembler 
malfunction or it may indicate a programmer 
error. The statement causing the error is identi- 
fied and, if possible, the assembly listing up to 
the point of the error is printed. The messages 
in this book give enough information to enable 
you to correct the error and reassemble your 
program, or to determine that the error ts an 
assembler malfunction. 


Messages 


IEV950 END OF STATEMENT FLAG WAS 
EXPECTED IN MACRO EDITED TEXT, 
BUT WAS NOT FOUND - MACRO 
EDITOR IS SUSPECT 

THE MACRO GENERATOR HAS 
ENCOUNTERED UNTRANSLATABLE 
MACRO EDITED TEXT 

BAD SET SYMBOL NAME FIELD OR 
LCL/GBL OPERAND - CHECK THE 
MACRO EDITED TEXT 

BAD SUBSCRIPT ON SET SYMBOL - 
CHECK THE MACRO EDITED TEXT 
CHARACTER EXPRESSION FOL- 
LOWED BY BAD SUBSCRIPTS - 
CHECK THE MACRO EDITED TEXT 

A RIGHT PARENTHESIS WITH NO 
MATCHING LEFT PARENTHESIS WAS 
FOUND IN AN EXPRESSION - CHECK 
THE MACRO EDITED TEXT 


IEV951 


[EV952 


IEV953 


IEV954 


IEV955 








lIEV956 MULTIPLE SUBSCRIPTS OR BAD SET 
SYMBOL TERMINATOR - CHECK THE 
MACRO EDITED TEXT 

BAD TERMINATOR ON CREATED SET 
SYMBOL - CHECK THE MACRO 
EDITED TEXT 

BAD TERMINATOR ON PARAMETER - 
CHECK THE MACRO EDITED TEXT 
UNEXPECTED END OF DATA ON 
H-ASSEMBLER WORK FILE (SYSUT1) 
- INTERNAL CORE MANAGEMENT IS 
SUSPECT 

A BAD INTERNAL FILE NUMBER HAS 
BEEN PASSED TO THE xxxxx 
INTERNAL CORE MANAGEMENT 
ROUTINE 

AN INVALID CORE REQUEST HAS 
BEEN MADE, OR THE FREE CORE 
CHAIN POINTERS HAVE BEEN 
DESTROYED 


IEV957 


IEV958 


IEV959 


IEV960 


IEV961 


Explanation: The assembly is terminated 
because of one of the errors described in IEV950 
through IEV961. This usually is caused by a bug 
in the assembler itself. Under certain condi- 
tions, however, the assembly can be rerun suc- 
cessfully. 


System Action: A special abnormal termination 
dump (Assembler H interrupt and diagnostic 
dump) follows the message. Depending on 
where the error occurred, the assembly listing 
up to the bad statement may also be produced. 
The dump usually indicates which statement 
caused termination. It also may include contents 
of the assembler registers and work areas and 
other status information for use by IBM or your 
assembler maintenance programmers in deter- 
mining the cause of the termination. 


Programmer Response: Check the statement 
that caused termination. Correct any errors in it 
or, especially if the statement is long or 
complex, rewrite it. Reassemble the program; it 
may assemble correctly. However, even if it 
reassembles without error, there may be a bug 
in the assembler. Save the abnormal termi- 
nation dump, the assembly listing (if one was 
produced), and the input deck and contact your 
IBM level-1 support center. Also, if the program 
assembles correctly, submit a copy of the listing 
and the input deck of the correct assembly. This 
information may be helpful in diagnosing and 
fixing the assembler bug. 


Severity: 20 


lEV970 


STATEMENT COMPLEXITY 
EXCEEDED, BREAK THE STATEMENT 
INTO SEGMENTS AND RERUN THE 
ASSEMBLY 


Explanation: The statement is too complex to be 
evaluated by the macro generator phase of the 
assembler. It overflowed the evaluation work 
area of the assembler. Normally, there is no 
assembler malfunction; the statement can be 
corrected and the program reassembled suc- 
cesSfully. 


System Action: A special abnormal termination 
dump (Assembler H interrupt and diagnostic 
dump) follows the message. The statement 
causing termination is SETA, SETB, SETC, AGO, 
or AIF. The dump does not indicate which state- 
ment caused termination; however, it may show 
the last statement generated in the macro. The 
dump may also include contents of the assem- 
bler registers and work areas and other status 
information for use by IBM or your assembler 
maintenance programmers in determining the 
cause of the termination. However, it will not be 
needed unless the error persists. This informa- 
tion may be helpful in diagnosing and fixing an 
assembler bug. 


Programmer Response: Check the statement 
that caused termination. Rewrite the statement 
or split it into two or more statements. Reas- 
semble the program; it should assemble cor- 
rectly. However, if the error persists, there may 
be an assembler malfunction. Save the 
abnormal termination dump, the assembly listing 
(if one was produced), and the input deck and 
give them to your IBM program support repre- 
sentative. 


Severity: 20 


lEV971 INSUFFICIENT CORE AVAILABLE 
FOR MACRO EDITOR WORK AREA 
NO AVAILABLE STORAGE REMAINS - 
ALLOCATE MORE CORE OR BREAK 
THE INPUT INTO MULTIPLE ASSEM- 


BLIES 


IEV972 


Explanation: The assembler work areas are full 
and none of the contents can be spilled onto the 
auxiliary data set (SYSUT1). Note that the load 
modules and fixed data areas of the assembler 
require about 96K bytes of main storage. The 
rest of the assembler’s region is used for data 
set buffers, assembler internal files, and work 
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areas. Some of the internal files, like the symbol 
table, must remain in main storage throughout 
the assembly. 


System Action: A special abnormal termination 
dump (Assembler H interrupt and diagnostic 
dump) follows the message. Depending on 
where the error occurred, the assembly listing 
up to the bad statement may also be produced. 
The dump usually indicates the statement being 
processed when the assembler ran out of main 
Storage. The other information in the dump, 
such as register and work area contents, is not 
needed. 


Programmer Response: Increase the region size 
or split the assembly into two or more assem- 
blies. Check for loops in open code that cause 
the symbol table to overflow. Complete informa- 
tion on these and other remedies, such as 
decreasing the storage used for data set buffers, 
is in “Chapter 6. Calculating Storage 
Requirements” and “Chapter 7. Assembler Lan- 
guage Programming under CMS.” 


Severity: 20 


SYSUT1 MAXIMUM BLOCK COUNT 
EXCEEDED 


IEV973 


Explanation: The maximum block count of 65,535 
has been exceeded for SYSUT‘1. 


System Action: The assembly is terminated and 
no listing is produced. 


Programmer Response: Split the assembly into 
two or more smaller assemblies. 


Severity: 20 


lIEV980 SYSUT1 IS REQUIRED TO BE 
ASSIGNED TO A DIRECT ACCESS 


DEVICE, BUT WAS NOT 


lIEV981 THE DD STATEMENTS FOR SYSIN 
AND SYSUT1 WERE MISSING OR 
INVALID 

IEV982 THE DD STATEMENT FOR SYSIN WAS 
MISSING OR INVALID 

lIEV983 THE DD STATEMENT FOR SYSUT1 
WAS MISSING OR INVALID 

lIEV984 MISSING DD SYSPRINT 

IEV985 MISSING DD SYSPUNCH 

lIEV986 MISSING DD SYSLIN 


Explanation: The DD statements for the data 
sets indicated in IEV980 through IEV983 have not 


144 Assembler H Version 2 Programming Guide 


been included in the job control language for the 
assembly job step or are invalid. 





System Action: The assembly is not done 
because the assembler does not have the 
required data sets. >This message appears 
alone, without any other abnormal termination 
dump information. 


Programmer Response: Supply a valid DD state- 
ment and rerun the assembly. “Chapter 1. 
Introduction” describes the assembler data sets 
and the standard DD statements (in ‘the 
IBM-supplied cataloged procedures) for them. 
Be sure to check whether your installation has 
changed the ddname (for example, SYSUT1 to 
SYSWORK‘1) or one or more parameters in the 
cataloged procedure statement. 


Severity: 20 


IEVS990 LOCATION COUNTER DOES NOT 


MATCH SYMBOL TABLE VALUE 


Explanation: A difference has been detected 
between the symbol table and the location 
counter. The assembly is terminated and a 
Special abnormal termination dump (Assembler 
H interrupt and diagnostic dump) is taken. The 
listing is not completed. 





System Action: The Assembler H interrupt and 
diagnostic dump will show the statement that 
was being printed when the difference between 
the location counter and the symbol table was 
detected. Register 8 points to the print buffer. 
Register 4 plus X'44' contains the value of the 
location counter. Register 5 contains the symbol 
table location counter value. 


Programmer Response: Reassemble the 
program using NOALIGN. lf alignment is 
needed, use CNOP or DS to force alignment. 


Severity: 20 


THE ASSEMBLER COULD NOT 
RESUME READING A SYSLIB 
MEMBER BECAUSE IT COULD NOT 
FIND THE MEMBER AGAIN 


IEV998 


Explanation: The assembly is terminated, 
because the assembler cannot find a COPY 
member that it has already read. This usually is 
caused by a bug in the assembler itself or by an J 





Operating System |/O error. Under certain con- 


ditions, however, the assembly can be rerun 
successfully. 


System Action: A special abnormal termination 
dump (Assembler H interrupt and diagnostic 
dump) follows the message. The dump usually 
indicates which statement caused termination. It 
also may include contents of the assembler reg- 
isters and work areas and other status informa- 
tion for use by IBM or your assembler 
maintenance programmers in determining the 
cause of the termination. 


Programmer Response: Reassemble the 
program; it may assemble correctly. If it does 
not reassemble without error, save the abnormal 
termination dump, the assembly listing (if one 
was produced), and the input deck and contact 
your IBM level-1 support center. 


Severity: 20 


IEV999(1I) ASSEMBLY TERMINATED - SYNAD 


EXIT TAKEN - PERMANENT I/O 
ERROR ON xxxxx DATA SET 


Explanation: The assembly was terminated 
because of a permanent I/O error on the data 
set indicated in the message. This is usually 
caused by a machine or an operating system 
error. The assembly usually can be rerun suc- 
cessfully. This message will also appear on the 
console output device. 


System Action: A special abnormal termination 
dump (Assembler H interrupt and diagnostic 
dump) follows the message. Depending on 
where the error occurred, the assembly listing 
up to the bad statement may also be produced. 
The dump usually indicates which statement 
caused termination. It also may include contents 
of the assembler registers and work areas and 
other status information for use by IBM or your 
assembler maintenance programmers in deter- 
mining the cause of the termination. 


Programmer Response: |f the !/O error is on 
SYSIN or SYSLIB, you may have concatenated 
the input or library data sets incorrectly. Make 
sure that the DD statement for the data set with 
the largest block size (BLKSIZE) is placed in the 
JCL before the DD statements of the data sets 
concatenated to it. Also, make sure that all 
input or library data sets have the same device 
class (all DASD or all tape). 


Reassemble the program; it may assemble cor- 
rectly. If it does not reassemble without error, 
save the abnormal termination dump, the 
assembly listing (if one was produced), and the 
input deck and give them to your IBM customer 
engineer. Also, if the program assembles cor- 
rectly, submit a copy of the listing and input deck 
of the correct assembly. 


Severity: 20 


Note: The following table is referred to in 
“Severity Code” under “Message Descriptions” 
on page 111. 


Severity 

Code Explanation 

0 No errors detected 

é Minor errors detected; successful 
program execution is probable 

8 Errors detected: unsuccessful 
program execution is possible 

12 serious errors detected; unsuccessful 
program execution is probable 

16 Critical errors detected; normal exe- 
cution is impossible 

20 I/O error from which the system could 


not recover occurred during 
assembly, or data sets are missing; 
assembly terminated 
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Appendix E. Assembler H Version 2 Incompatibility with 
OS/VS Assembler 


Assembler H has the following incompatibilities with the OS/VS Assembler: 
¢ TEST option 


The TEST option in the OS/VS Assembler generates entries in the source 
symbol table for simply relocatable EQUs, named LTORGs, named CNOPs, 
and named ORGs. Assembler H does not generate source symbol table 
entries for these assembler instructions. 


¢ COPY 


Assembler H scans a COPY member as a part of “look-ahead” processing 
even though conditional assembly logic (AIF or AGO) may subsequently 
cause a COPY instruction to be bypassed. This processing occurs regard- 
less of whether or not the COPY member is a macro or source code 
segment and—for macros—whether or not the macro is defined in a source 
module or macro library. 


Lookahead is a Sequential, statement-by-statement, forward scan over the 
source text; it is performed by Assembler H but not by the OS/VS Assem- 
bler. During look-ahead processing, no macro expansion or open-code sub- 
stitution is performed, and no AIF or AGO branches are taken. 


If the COPY member does not exist in a referenced macro library, Assem- 
bler H issues error message IEVO60, ‘COPY CODE NOT FOUND’, even 
though conditional assembly logic may Subsequently cause the COPY 
instruction to be bypassed. |f the COPY member does exist and contains 
errors, those errors will be diagnosed and the appropriate error messages 
issued only if the COPY member is actually assembled. 


The OS/VS Assembler executes a COPY assembler instruction and scans 
the COPY member only if conditional assembly logic causes it to be exe- 
cuted. If the COPY member does not exist and conditional assembly logic 
causes the COPY instruction to be bypassed, no error message will be 
issued. The one exception to this rule occurs when a macro is defined 
within the source module and that macro contains a COPY statement; if the 
COPY member does not exist in any referenced macro library, the OS/VS 
Assembler issues message IFO068, ‘COPY MEMBER xxxxxxxx NOT FOUND 
IN LIBRARY’. 


© &SYSNDX 


Assembler H produces up to seven digits for the value of &SYSNDX. The 
OS/VS Assembler produces a four-digit value. 
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| Appendix F. Sample Listing Containing Double-byte Data 


| The following listing was produced on an IBM 3800-8 system printer, using the 
| program MVS/SP utility—Kanji (5799-BWM). For more information, please refer 
| to the appropriate manuals for that utility. 


| Note: The listing below intends only to illustrate what double-byte data can /ook 
| like; it is not intended to be a comprehensive example of the usage of double- 
| byte support. 
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SYMBOL 


TYPE ID ADDR LENGTH LD ID FLAGS 


DBCSSAMP SD 0001 OO00000 000219 


EXTERNAL SYMBOL DICTIONARY 


00 


SAMPLE <D I} C S> PROGRAM, REQUIRES DBCS OPTION 


LOC OBJECT CODE 
000000 


ooo0o00 I1BFF 
goo0d2 O7FE 


000004 42C142C2 


000008 0F&42C142C20F 


OOOOOE 420142C242C342C4 
000016 420542C642C742C8 
OOOOLE 42C0942D142D242D3 
000026 4%2D442D542D642D7 
DOOOZE 42D842D942E242E3 
000036 42E4%42E54¢2E642E7 
DOOOZSE 42E842E942C142C2 
000046 420342C0442C542C6 
OOOOGE 42C742C8 


000052 C1C2C3C4C5cCé6C7c8 
Q0005A C9D1D2D3D4D5D6D7 
000062 D&8D9EZESEGE5E6E7 
DOO06A EB0E42C142C242C3 
000072 42C0442C542C642C7 
DO007A 42C842C 942D142D2 
000082 42D3420D442D542D6 
JOO08A 4207420D842D942E2 
000092 42E342E442E50FC1 
DO009A C2C3C4C5C6C7C8C9 
D000A2 D1D2D3 


Figure 


ADOR1 ADDR2 STMT 


00004 


042C3 


E42C30F 


SOURCE STATEMENT ASM H V 02 16.19 
2 DBCSSAMP CSECT 
3% 
G % HANDLE SITUATION WHERE USER TRIES TO EXECUTE SAMPLE PROGRAM 
5 x 

6 * '<A>* --- THIS IS DBCS. 

7 * ‘Ai ------ THIS IS EBCDIC. 
B * 

9 SR 15515 CLEAR RETURN CODE INDICATOR 
10 BR 14 RETURN TO CALLER 
11 USING #*,8 
12 PRINT ON,DATA 
13 (36 EG EE 6 HE 0 8 0 3G EB 0 2 0G DG 5 EE 2 tS 2 Ot 38 3G 
14 * *% 
15 * SAMPLE USAGE OF DBCS DATA x 
16 * * 
LL? RHEE BHU ee HBB ee Rei PHB 
18 aicL_cvaR setc '<D BCS 1 >' SET A VALUE IN VARIABLE SYMBOL 
19 MNOTE #,'LCL_CVAR IS &LCL_CVAR.' 

##,icL_cvaR IS <D BCS 1> 
20 * 
21 G_VAR DC G‘<AB>" SET UP A G TYPE CONSTANT 
22 * 
23 C_VAR DC c'<AB>: SET UP A C TYPE CONSTANT 
24 % 
25 G_EQU EQqU) G'<C>! SET UP A G TYPE EQUATE 
26 * 
27 C_EQU EQU c'<C>! SET UP A C TYPE EQUATE 
2Q PNM HATHA HA BSH ao BH BS SH Re ER HS HH 
29 * * 
30 * SAMPLE OF EXTENDED CONTINUATION USAGE x 
31 * tt 


32 J88BBHRB BBB BBRBBRBRHEHB BERBER BRR BEBE EBB BREUER RBEBORHE 
33 G_VAR2 DC 


<ZABCDEFGH>: 
34q # 
35 C_VAR2 DC 


<NOPQRST U V >aBcpDEFGHIUKL ' 
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08/27/87 
00020000 
00030000 
00040000 
00050000 
00050000 
00050000 


00060000 
00070000 
00080000 
00090000 
00100000 
00110000 
00120000 
00130000 
00140000 
00150000 


00160000 
00170000 
00180000 
00190000 
00200000 
00210000 
00220000 
00230000 
00240000 
00250000 
00260000 
00270000 
00280000 


@e<«ABCDEFGHIJKLMNOPQRSTUVWX Y >xxexo00370000 


00380000 
00390000 


C ‘ ABCDEFGHIJKLMNOPQRSTUVNXY<A BCDEFGHI J K L Moxxoo4o00000 


00410000 











LOC 


GOO0A5 
OOO0O0AD 


J000B1 
D000B9 
d000C1 


yoooce2 
DOOOCA 


OOOOCE 


OO00D6 
OONODE 


C 


SAMPLE <D BC S> PROGRAM, REQUIRES DBCS OPTION 


OBJECT CODE 


0E4% 2044202420342 
E242F10F 


E2C 2C3E2F10E42C4 
42C242C342E242F2 
OF 


0E4204420 2420342 
E242F30F 


E2C2C3E 2F 20E42C4 


42C242C342E242F4 
OFE2C2C3E2F3 


ADDR1 ADDR2 STMT 


36 


37 &C_VAR3 SETC 


38 


SOURCE STATEMENT 


<OPQRSTUVWXY Z>! 
MNOTE *,'C_VAR3 IS &C_VAR3.' 
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00390000 


* ABCDEFGHIJKLMNOPQRSTUVWXY<A BC DEFGHI J K LMN>x00330000 


00340000 
oo3so000n 


#%,C_VAR3 IS ABCDEFGHIJKLMNOPQRSTUVWXY<A BCDEFGHI J KLMNO P>x00350000 


+ 


<QRSTUVWXY Z> 


39 * 00360000 
&O FRREHREAHIART HEHE eH ee PH So SS SH PH SH 00620000 
G1 * * 00430000 
42 * SAMPLE OF MACRO USAGE * 00440001 
G3 x * 0045000) 
OG THHHIERRUMHN TI HHH RE ABER ERAS 00460000 
45 MACRO 00470000 
46 &NAME SAMPLE &VAR 0048000" 
47 &K VAR SETA K'&VAR-2 COUNT OF BYTES IN PARM 00490000 
48 &L_VAR  SETC '&VAR'(2,&K_VAR) LOCAL COPY OF SYMBOLIC PARM oos500000 
49 .* MINUS 2 FOR APOSTROPHES 00510000 
50 MNOTE *,'POSITIONAL PARAMETER IS &L_VAR.' 00520000 
51 DC C&VAR 00530000 
52 MEND 00540000 
53 * 00550000 
54 SAMPLE '<DBCS 1] >: 00560000 
554%,POSITIONAL PARAMETER IS <D BCS 1 > 01-00050 
564 pc e<DBCS 11>: 01-00051 
57 * 00570000 
58 SAMPLE 'spcs1<D BCS 2>: 00580000 
59+%,POSITIONAL PARAMETER IS sBcs1<D BCS 2> 01-00050 
60+ DC c'spcs1<D BCS2>! 01-00051 
61 * 00590000 
62 SAMPLE '<D B >xx00600000 

<CS3>! 00610000 
63+%,POSITIONAL PARAMETER IS <D BCS 33> 01-00050 
644 DC c<DBCS83>: 01-00051 
65 * 00620000 
66 SAMPLE 'spcs2<D B C >x%x00630000 

<S 4 >sspcs3' 00640000 
67+%,POSITIONAL PARAMETER IS spcs2<D BC S 4 >spes3 01-0005 
68+ DC c'spcs2<D BC S 4 >spcs3° 01-00051 
69 * 00650000 
70 MACRO 00660000 
71 &8NAME2 SAMPLE2 aTHIS='<D BCS 5>! 00670000 
72 & THIS SETA K'&THIS~2 COUNT OF CHARACTERS IN PARM 00680000 
73 aT_THIS SETC '&THIS'(2,&K_THIS) LOCAL COPY OF SYMBOLIC PARM 00690000 
74% ” MNOTE %*,°KEYHORD PARAMETER IS &T_THIS.' 00700000 
75 DC C&THIS 00710000 
76 MEND 00720000 
77 * 00730000 
78 SAMPLE 2 00740000 
79+%,KEYHORD PARAMETER IS <D BCS 5> 01~00074 
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Loc 
OO00E4 
OOOOEC 


OOOOFO 
OOOOF8 


OOOOFC 
000104 
00010C 


20010D 
006115 


000119 
000121 
000129 


00012F 
000137 
00013F 
000147 
DOO14F 
000157 
0OO15F 
000167 
OOO16F 
000177 
00017F 
000187 
OO018F 
000197 
00019F 
CO01A7 


0O01AD 
0001B5 
0001BD 
0001C5 





SAMPLE <D BC S> PROGRAM, REQUIRES DBCS OPTION 


OBJECT CODE ADDR1 ADDR2 STMT 


0E42044202420342 
E242F50F 


0E4204420 2420342 
E242F 60F 


E2C2C3E2F40E42C4 
420 2420342E 242F7 
OF 


0E420442C242C342 
E242F 80F 


E2C2C3E2F 50E42C4 
42C0242C342E242F9 
OFE2C2C3E2F6 


0E42044202420342 
E242F14¢2FOOFOE42 
C4420 2420342E242 
F142F OOF OE42C442 
C2420342E 242F 142 
FOOFOE42C442C242 
C342E242F 142 F00F 
0E420442C0 2420342 
E242F 14¢2FOOFOE42 
C4420 2420342E 242 
F142FO0FOE4$2C442 


C242C342E242F142 
FOOFOE42C442C 242 


C342E 242F 142 F00F 
0E 4204420 2420342 
E242F142F00F 


42044 20 242C342E2 
42F142F042C442C2 
420342E 242F142F0 
4204420242C342E2 


80+ 


81 #* 
82 


SOURCE STATEMENT 


DC c'<DBCS 5>: 


SAMPLE2 THIS='<D BCS 6>» 


83+",KEYWORD PARAMETER IS <D BCS 6> 


84+ 


85 * 
86 


DC c'<DBCS6>: 


SAMPLE2 THIS='secs4<D BCS 7 >: 


87+", KEYWORD PARAMETER IS sacs4¢<D BCS 7> 


88+ 


89 #* 
90 


DC c'spcse¢<D BC S 7 >: 


SAMPLE 2 
<C S 8>' 


91+¢%,KEYHORD PARAMETER IS <D BCS 8> 


DC c'<DBCS 8>: 


SAMPLE 2 
<S 9 >spcse' 


95+", KEYWORD PARAMETER IS sBcs5<D BC S 9 >sacse6 


96+ 


97 

98 

99 

100 &T_1 

101 T_l 
+T_1 


102 * 
103 T_2 
+T 2 


DC c'spcss<D BC S 9 >specse' 


VARIABLE SYMBOL TOO LARGE FOR ONE LINE 


SETc (9)9'°«<DBCS10Q>: 
DC C'aT_1' 
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01-00075 


00750000 
00760000 
01-00074 
01-00075 


00770000 
00780090 
01-00074 
01-00075 


0079000N 


THIS='<D B >xxxoo0so00000 


00810000 
01-00074% 
01-00075 


00820000 


THIS='sBcs5< D B C >xxo083001:9 


00840000 
01-00074 
01-00075 


00850000 
o08é600nn 
00870009 
o08sonnn 
o0s900nn 


DC e<DBCS10><DBCS10>DBCS10><DBCS 1 >xo08900n0 


<0O>*DBCS10>»DBCS10>»DBCS10>x+DBC S>x 


<10>DBCS10>: 


DC 3s GG" &T_1' 


00900000 
00910000 


pc e<DBCS§10><DBCS10>»DBCS 10><DBCS 1 >xo0910000 
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SAMPLE <D B C S> PROGRAM, REQUIRES DBCS OPTION 


Loc OBJECT CODE 
OODICD 42F142F042C0442C2 
0001D5 42C0342E242F142F0 
OOOIDD 42€0442C0242C342E2 
OOOLES 42F142F042C0442C2 
OOO1LED 42C0342E242F142F0 
OOOLFS 4204420242C342E2 
OOO1LFD 42F142F042C442C2 
000205 42C0342E242F142F0 
00020D 4204420 242C342E2 
000215 42F142F0 


SYMBOL LEN VALUE 


C_EQU 00001 0£42C30F 
C_VAR 00006 000008 
C_VAR2 00083 000052 
DBCSSAMP 00001 00000000 
G EQU 00001 000042c3 
S$ VAR 00004 000004 
S VAR2 00068  00000E 
Tl 00126 00012F 
T_2 00108  0001AD 


ADDR1 AODR2 STMT SOURCE STATEMENT 


DEFN REFERENCES 


0027 
0023 
0035 
0002 
0025 
0021 
0033 
0101 
0103 


<O>*DBCS10>»DBCS10>*<DBCS10>»DBCS>x 


<10>»<DBCS10>: 


104 * 

105 * TYPE SPECIFICATION 

106 * 

107 &TT_1l SETC T'T_1l 

108 &TT_2 SETC T‘T_2 

109 * 

110 MNOTE *,‘TYPE OF T_1 IS &TT_1. - A C-TYPE CONSTANT ' 
#%,TYPE OF T_1 IS C - A C-TYPE CONSTANT 

111 MNOTE #, ‘TYPE OF T_2 IS &TT_2. ~ A G-TYPE CONSTANT' 
+%,TYPE OF T_2 IS 3 - A G-TYPE CONSTANT 

112 END 


CROSS REFERENCE 


DIAGNOSTIC CROSS REFERENCE AND ASSEMBLER SUMMARY 
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00920000 
00930000 
00940000 
00950000 
00960000 
00970000 
00980000 
00980000 
00990000 
00990000 
01000000 
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NO STATEMENTS FLAGGED IN THIS ASSEMBLY 
OVERRIDING PARAMETERS- D8CS 
OPTIONS FOR THIS ASSEMBLY 

NODECK, OBJECT, LIST, XREF( FULL)» NORENT, NOTEST, NOBATCH, ALIGN, ESD, RLD, NOTERM, DBCS, 


LINECOUNT(55), FLAG(0), SYSPARM( ) 


NO OVERRIDING DD NAMES 
101 CARDS FROM SYSIN 


224 LINES OUTPUT 


O CARDS FROM SYSLIB 
12 CARDS OUTPUT 


SSS 


rrr rr 


Figure 20 (Part 4 of 4). Sample Listing Containing Double-byte Data 
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Glossary 


This glossary has three main types of definitions that 
apply: 


¢ To the assembler language in particular (usually 
distinguished by reference to the words “assem- 
bler,” “assembly,” etc.) 


¢ To programming in general 


¢ To data processing as a whole 


If you do not understand the meaning of a data proc- 
essing term used in any of the definitions below, refer 
to Vocabulary for Data Processing, Telecommuni- 
cations, and Office Systems, GC20-1699. 


IBM is grateful to the American National Standards 
Institute (ANSI) for permission to reprint its definitions 
from the American National Standard Vocabulary for 
Information Processing, which was prepared by Sub- 
committee X3K5 on Terminology and Glossary of 
American National Standards Committee X3. ANSI 
definitions are preceded by an asterisk (*). 


addressing mode (24-bit). A System/370 addressing 
mode of the extended architecture that allows a 
program to execute using 24-bit addresses. When 
operating in 24-bit mode, S/370 addressing architec- 
ture is applied. Other facilities of the extended archi- 
tecture (see below) may be utilized. Only the 
low-order 24 bits of an address are used; the high- 
order bits are ignored. 


addressing mode (31-bit). An extended architecture 
addressing mode (AMODE) that allows a program to 
execute using 31-bit addresses and/or other facilities 
of the extended architecture. When operating in 
31-bit mode, extended architecture addressing is 
applied, and all but the high-order bit of an address 
are used to address storage. 


assemble. To prepare a machine language program 
from a symbolic language program by substituting 
machine operation codes for symbolic operation 
codes and absolute or relocatable addresses for sym- 
bolic addresses. 


*assembler. A computer »rogram that assembles. 


assembler instruction. An assembler language source 
statement that causes the assembler to perform a 
specific operation. Assembler instructions are not 
translated into machine instructions. 


assembler language. A source language that includes 
symbolic machine language statements in which there 
iS a one-to-one correspondence with the instruction 
formats and data formats of the computer. The 
assembler language also contains statements that 


represent assembler instructions and macro 
instructions. 


bimodal program execution. A function of the 
extended architecture (see “addressing mode 
(31-bit)”) that allows a program to execute in 24-bit or 
31-bit addressing mode. The addressing mode is 
under program control. 


bracketed DBCS. DBCS characters enclosed with a 
shift-out (SO) character and a shift-in character (Sl) to 
identify them from SBCS, and containing no SBCS 
characters except SO and SI. 


control program. A program that is designed to 
schedule and supervise the performance of data proc- 
essing work by a computing system. 


control section (CSECT). That part of a program spec- 
ified by the programmer to be a relocatable unit, all 
elements of which are to be loaded into adjoining 
main storage locations. 


*diagnostic. Pertaining to the detection and isolation 
of a malfunction or mistake. 


double-byte character set (DBCS). DBCS is a means 
of providing support for Ideographic Languages which 
contain too many symbols to be represented by a 
single byte character set such as EBCDIC. A valid 
double-byte character is defined as either DBCS blank 
(X'4040'), or a pair of bytes, each of which must be in 
the range X'41' to X'FE', inclusive. 


double-byte data. Double-byte character strings are 
commonly referred to as double-byte data. 


dummy control section (DSECT). A control section 
that an assembler can use to format an area of 
storage without producing any object code. Synony- 
mous with dummy section. 


edited text. Source statements modified by the 
assembler for internal use. The initial processing of 
the assembler is referred to as editing. 


*entry point. A location in a module to which control 
can be passed from another module or from the 
control program. 


extended architecture. A hardware architecture for 
the IBM 3081 processor. A major characteristic is 
31-bit addressing. See also “addressing mode 
(31-bit).” 


external symbol dictionary (ESD). Control information 


associated with an object or load module which identi- 
fies the external symbols in the module. 
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global dictionary. An internal! table used by the 
assembler during macro generation to contain the 
current values of all unique global SETA, SETB, and 
SETC variables from all text segments. 


global vector table. A table of pointers in the skel- 
eton dictionary of each text segment showing where 
the global variables are located in the global dic- 
tionary. 


instruction. *(1) A statement that specifies an opera- 
tion and the values and locations of its operands. (2) 
See also “assembler instruction,” “machine instruc- 
tion,” and “macro instruction”. 


job control language (JCL). A language used to code 
job control statements. 


*job contral statement. A statement in a job that Is 
used in identifying the job or describing its require- 
ments to the operating system. 


language. A set of representations, conventions, and 
rules used to convey information. 


*|anguage translator. A general term for any assem- 
bler, compiler, or other routine that accepts state- 
ments in one language and produces equivalent 
statements in another language. 


library macro definition. A macro definition that is 
stored in a macro library. The |BM-supplied super- 
visor and data management macro definitions are 

examples of library macro definitions. 


linkage editor. A processing program that prepares 
the output of language translators for execution. It 
combines separately produced object or load 
modules; resolves symbolic cross references among 
them; replaces, deletes, and adds control sections; 
and generates overlay structures on request; and 
produces executable code (a load module) that is 
ready to be fetched into main storage and executed. 


load module. The output of a single linkage editor 
execution. A load module is in a format suitable for 
loading into virtual storage for execution. 


loader. A processing program that performs the basic 
editing functions of the linkage editor, and also 
fetches and gives control to the processed program, 
all in one job step. It accepts object modules and 
load modules created by the linkage editor and gener- 
ates executable code directly in storage. The loader 
does not produce load modules for program libraries. 


local dictionary. An internal table used by the assem- 
bler during macro generation to contain the current 
values of all local SET symbols. There is one local 
dictionary for open code, and one for each macro 
definition. 
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location counter. A counter whose value indicates the 
assembled address of a machine instruction or a con- 
stant or the address of an area of reserved storage, 
relative to the beginning of the control section. 


*machine instruction. An instruction that a machine 
can recognize and execute. 


*machine language. A lanquage that is used directly 
by the machine. 


macro definition. A set of statements that defines the 
name of, format of, and conditions for generating a 
sequence of assembler language statements from a 
single source statement. This statement is a macro 
instruction that calls the definition. (See also “library 
macro definition” and ‘source macro definition.”) 


macro generation (macro expansion). An operation in 
which the assembler generates a sequence of assem- 
bler |anguage statements from a single macro instruc- 
tion, under conditions described by a macro definition. 


macro instruction (macro call). An assembler lan- 
guage statement that causes the assembler to 
process a predefined set of statements (called a 
macro definition). The statements normally produced 
from the macro definition replace the macro instruc- 
tion in the source program. 


macro library. A library containing macro definitions. 
The supervisor and data management macro defi- 
nitions supplied by |BM (GET, LINK, etc.) are con- 
tained in the system macro library. Private macro 
libraries can be concatenated with the system macro 
library. 


main storage. All program addressable storage from 
which instructions may be executed and from which 
data can be loaded directly into registers. 


object module.- The machine-language output of a 
single execution of an assembler or a compiler. An 
object module is used as input to the linkage editor or 
loader. 


open cade. The portion of a source module that lies 
outside of and after any source macro definitions that 
may be specified. 


*aperating system. Software which controls the exe- 
cution of computer programs and which may provide 
scheduling, debugging, input/output control, 
accounting, compilation, storage assignment, data 
management, and related services. 


ordinary symbol attribute reference dictionary. A dic- 
tionary used by the assembler. The assembler puts 
an entry in it for each ordinary symbol encountered in 
the name field of a statement. The entry contains the 
attributes (type, length, etc.) of the symbol. 








processing program. (1) A general term for any 
program that is not a control program. (2) Any 
program capable of operating in the problem program 
state. This includes |IBM-distributed |anguage transla- 
tors, application programs, service programs, and 
user-written programs. 


program. A general term for any combination of 
statements that can be interpreted by a computer or 
language translator, and that serves to perform a 
specific function. 


pure DBCS. DBCS characters not delimited by SO 
and SI. These characters must be known to be DBCS 
by some other method, such as the position in a 
record, or a field type descriptor in a Database envi- 
ronment. 


real storage. The storage of a System/3/70 computer 
from which the central processing unit can directly 
obtain instructions and data, and to which it can 
directly return results. 


‘relocation dictionary. The part of an object or load 
module that identifies all addresses that must be 
adjusted when a relocation occurs. 


residence mode. An extended architecture 
addressing mode (RMODE) that allows a program to 
specify the residence mode (below 16 megabytes or 
anywhere) to be associated with a control section. 


return code. A value placed in the return code reg- 
ister at the completion of a program. The value is 
established by the user and may be used to influence 
the execution of succeeding programs or, in the case 
of an abnormal end of task, may simply be printed for 
programmer analysis. 


severity code. A code assigned by the assembler to 
each error detected in the source code. The highest 
code encountered during assembly becomes the 
return code of the assembly step. 


shift-in (SI). The shift-in (SI) EBCDIC character 
(X'OF') delimits the end of double-byte data. 


shift-out (SO). The shift-out (SO) EBCDIC character 
(X'OE') delimits the start of double-byte data. 


skeleton dictionary. A dictionary built by the assem- 
bler for each text segment. It contains the global 


vector, the sequence symbol reference dictionary, and 
the local dictionary. 


source macro definition. A macro definition included 
in a source module, either physically or as the result 
of a COPY instruction. 


source module. The source statements that consti- 
tute the input to a language translator for a particular 
translation. 


source statement. A statement written in symbols of 
a programming language. 


“statement. A meaningful expression or generalized 
instruction in a source language. 


symbol file. A data set used by the assembler for 
symbol definitions and references and literals. 


symbolic parameter. In assembler programming, a 
variable symbol declared in the prototype statement 
of a macro definition. 


system macro definition. Loosely, an |BM-supplied 
library macro definition which provides access to 
operating system facilities. 


text segment. The range over which a local dic- 
tionary has meaning. The source module is divided 
into text segments with a segment for open code and 
one for each macro definition. 


*translate. To transform statements from one lan- 
guage into another without significantly changing the 
meaning. 


virtual storage. Address space appearing to the user 
as real storage from which instructions and data are 
mapped into real storage locations. The size of 
virtual storage is limited by the addressing scheme of 
the computing system and by the amount of auxiliary 
storage available, rather than by the actual number of 
real storage locations. 


ward. A set of DBCS characters which have the same 
high-order byte value. The first byte of a double-byte 
character is known as the ward byte. A ward contains 
190 characters. Ward X'42' defines the double-byte 
representation of those EBCDIC characters which are 
in the range X'41' to X'FE'. 
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abnormal assembly termination 18 
adding macro definitions to libraries 49 
ALGN option 30 
ALIGN option (CMS) 70 
ALIGN option (OS/VS) 30 
alignment of instructions and data 
(see ALIGN option) 
AMODE 8 
ASMHC, cataloged procedure for assembly 38 
ASMHCG, cataloged procedure for assembly and 
loader execution 42 
ASMHCL, cataloged procedure for assembly and link 
editing 39 
ASMHCLG, cataloged procedure for assembly, linkage 
editing, and execution 42 
ASSEMBLE file type, CMS 66 
assembler cataloged procedures 38 
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list of 33 
sample program 85 
storage requirements 595 
virtual storage requirements (CMS) 74 
assembler diagnostics 112 
abnormal assembly termination 18 
cross-reference 12 
error messages 15 
facilities 15 
macro trace facility (MHELP) 18 
MNOTE statements 16 
suppression of error messages and MNOTE state- 
ments 18 
assembler H messages 111 
(see alsO error Messages and assembler diagnos- 
tics) 
assembler listing 
diagnostic cross-reference and assembler 
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external symbol dictionary 7 
parts of 5 
relocation dictionary 11 
source and object program 8 
symbol and literal cross-reference 12 
assembler macros under CMS 67 
assembler options 
default 33 
list of 30 
overriding statements in cataloged procedures 44 
types of 29 
assembler options under CMS 
listing control options 70 


assembler options under CMS (continued) 
object module control options 70 
other assembler options 70 
SYSTERM options 70 

assembler statistics 13 

assembler summary 13 

assembly and link editing, JCL for 
(see ASMHCL) 

assembly and loader execution, JCL for 
(see ASMHCG) 

assembly error diagnostic messages 112 

assembly, JCL for 
(see ASMHC) 
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